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SPECTRUM 128EL SUMMUM 



El Spectrum 138. 

Gran capacidad de memoria. Teclado y 
mensajes en castellano, teclado independienie 
paia operaciones numericas y de [ratamienio 
de textos.., 

Sinclair e Invesironica han desarroUado una 
autentica novedad. En ningun lugar del mundo. 



salvo en las Dun I .. sdalnvestrSniea, 

Se el primero en tener lo ultima 
SPECTRUM 128. NOVISIMUS 



-^ 



invastronica 
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Esie mes el Sped rum es mas nolicia que nunca, 
al ampliarsc la familia a un nuevn miembro: el 
sperado Specirum dc 128 Kbytes, Por 511 pane el 
L se ve cnmpltiailii i -mi Lis uueviis unidades de 
disco. Bucnas noticias v liuenas novedades que 
hahi-.in pndulii iiunpriihur nuiy de cerca los 
usunrios caialanes, cmi mutivn dc la feriu del 
mimag. De esla (cria liiiM;iriiri'.is en el proximo 







j\ Ctirica. D=u> ex machine, A view ro a kill, 
* Tipper. Ruling micro.lrivc. 


fi*l< W. Ml 


g <H=» prohad,,? Mas in,™, y records a 




*f\ Profanation priifanado. Des< ulirc el 
IU cammoalarumbadcAbuSimbel. 




Kotteias. Sinclair** un hervidero de 

Id noiitbs.df.dctlSp-ftr.im i2SKbytes 

hastaelQLamiraddcprecio I 




On Di * c, » P fl ™ Spectrum. De todra los 
*U lama rt 0s . optddldes, formalos. y picric*. 


•—■ 


Doasicr cducacion. Spectrum en el Auk 
Oft Aiaoevaluarirtn, Logo Sinclair, 

^W Reeursivntnl del l..^.':, 1 .[fo:irn , cuk>s.k 
Olms HMOS profestonales en In cducacidn. 


SM 


Libras. Graficos, colore* v mibka en d 
46 ZX Spectrum. Sprites y y.taficos en lenfcuajc 
miquira. 


4r 


48 Lee,o,e, 




58 Pmerama B .Mic™l,ive,llump,v Dumpy. 


«__l.a_ 


68 ££f' n,d ' iUina ' Lcn ^' ieniil i ul ™ cn 




73 Concursn Invesdisk. 




Programs especial. No Ic quedes 
74 fueta dc i UI E n ' 1-tf.tiiiln dc ml complein 


^■rtl 


ft A M,,n ' a jc; a camara Icnla. Modifies a 
"^* placer la vclocidud dc tus progrumns. 
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QO Basic. Domina la tecnica ile! SCROLL y 
"" create ru propiu vidcojucgo. 


•B^ 


Q6 Compra-vcndo. Ofcnas muy imcrcsantcs. 




98 t~™. 
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de perfection ,,k;m/ad 

La ptimcra Case del 

dad del bloq'uc occiden- la construction de las 

1:1!] v ctLriLTicadcniiunextriinopni- de DNA. Los doblea helices de 

a formation de un set hu- DNA deben mamenerae conii- 

sie set sea In mas perfecm posi- diame la uriliaacitin del cursor. Si 



Dure), fotdpralbs y di 
tirns, ademas de prnprai 
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irgsalB vcjczy ponild- 




mucte v el [>r. -^r.iTii.i >. 






Duis 




laruki < 


ut combina a la perfec 






Cnim-hi 
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ISpcciruni. MwiitniMjiii 
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n otras an papel sl limiii 








to* grfflcos nl el movi- 








reaulta sorptendente v 




« original. IJr, bue. 


pro E rarr 
















> insiruccinnes csijCn en 


ingles. 

' A, 


ririad: 8 
pidez: 7 




is compensation . 

pueik'n Ut-jpii piupma si 

Eonsiaeran frien aiendidos, ai 
:ogeHo apatecen batlarinas ile 
ammadoras deponivas, 

.r.il, en que nm 




ducciOfl que se 



esic ttpneii sn .iruumu 
ma's original que Ins 
itaiucs h.nallas dt mar- 
[jiMlaHuilisiii es mi ai 
lii'b.' attiitk-r i-n solitar 
L'lii'ruckl. Su pririu-r ir.i 
\v/j en uri Iw :il i|iir iii 



Ijis f"r:iftaw nH-'ioKin a niedkla 
[]iil- |iiiisuvsimio,s i-'l primer lures 
" " pobre do colurkln, 
l>i']'o lus iri's ivs lames e.iijii nuiy 
jiu-ii rcali/aiUis. Us msliwannes 
sl' entile ill ran en ingles. In que 
mi tiene demasiadi miiiiiriniKLi 



R0TI NAS MICRODRIVE 
2.100 pts 



Qargo, pro^rama I 



MliKljf- Oil ;H|Uf[| l>B 

(irabailns muiliante la 
LINE. Pur lanto, kis lisia- 
i inaecesihles. IVrn in Jo 

uiinu qui' permlie 

pioHiaina.s del mlcroelrhv 
In que ae auioejeeuieii. 



n .seilula si el muy 
cub y en que Ireei 




IHAS PROBADO? 



iSe acuerda 
del hobbit? 

til lalmamino Coninlo GdDM 



n poke juHccuado, d que nos 
; Jose Javier lie Madrid 








$e comenta que las pantallas de Profanation han 

causado gran espectacidn en los medios 

especializados londinenses. Y no es de extranar. 

Sin embargo, ma's de una ha tenido que desistir en 

su empeno de llegar al final ante la enorme 

dificultad de algunas pantallas. Para que podais 

conocer a fondo el programa, incluimos una 

peqtiena rutins con la que pasar directamente a 

la palilalia e leg id a. 



disrintas, dismbuiiTHs pi 



Los obstaculos 
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en caso lie cacr en alguna dc ellns per- 




guicnlcs teelaai C. V. R, T. I, O. 






que podemos OOteos por protundos 
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mos que lodi aemi.la.l h. .li-siip.ir.i-v 


\xv<- Iiilmll Ix:i';l[ ;il no MjblL-rr.inco 
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hNTLR jpareeera la pamal'la .Irscada. 


nuBln'ZskSn ^^"meno! que 
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bajo de la hahitacidn la pilar.™ ('.< )I"J1 


Un ddalle imponanlc i tenet en 
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GO? En este moment" hemos de in- 






trodudrel ctldigo corrcein Mr eqmvo- 




taring in.:. ipL.li'L.n..- li.^|ii..il'i'Ei'" 


mismn -i no qiicr.'iTKi. !U W r a ser pri- 




ohnervando cdrno el ordenador ha he- 


Moiieras ilc el, i-a i|in en una pane del 
aitij.i herim- tit- inlijr al Irampnrtador 
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mero 9127, Una vuiiurodurido pulsi- 






mos ENTKR y apartcerS" en el centto 












nos indica donde w va a situar d mu- 


^copa.emmaverto-invyble- 
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this: a la '/quieriL ■■■<:< 1. :i la iLrn-ln 


eCodigo? 




— *Una vei situado el cursor en el 


Pot lo visio, c] pro^rainador eta 

ai|l::ULTlU- .Ii" 1.1 ^r.frl lIlllCLlllild p^fil 


posar lie unas pantallas a olras. poi lo 
que idea una rutina especial para pnrier 

ar descados, sin rener que superar 
jbstaculo alguno, Adcm^s esia ruttna 


In^ar d<"-iMr1>i, |'.iK;if[i.;-. I'N'I hill r el 
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I «B ™ m m I Programs en BASIC 
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SirClive 
vuelve a ser 
el jefe 



ictnolojrfas. En ajXesUrau a 
— iisfxxtQ frc- ipattatporS 



Si'irfwr Krwirtb. 
Sir CUw rcloraa 

conirobr el 85 | 



, del magnarc dc la <.-iiin|jciiii;< i|ui: V :i 
(•<",' ItaiJ, IV rcraructuradc. su equ: 
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minttmcior, 
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En calidad dc Dire 
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Bank v Citibank,) v s 

niMMd'nres (Thorn' I 

Times y AB Electto- 

1rL\ 1n r-'di.b icorjfuni 



ci6n formal dc gucrra. 



Bill Jeffrey, 

aires en Sinclair Research 

mquc Sir dive siga ocupando ll direction dc 



a paJMi foem (J 
m Mats Elcc 



Microordenador en forma de manzana 




SPECTRUM 128 

un nuevo modelo de Spectrum: el 1 28. 




El Spectrum l2»sefabdca.aenMa. 
drid, protablcmenK m los locales dc 
[ndnyra (oira filial de El Cone fogMs), 



ril-Hif-Vil ,t - na ■ 

Con el finde ampliar In tlitlnliucnin del .™/(»arf. Dimension 
New ha finnado nn oonuuo con Idealogic (conocidas 
firma* afincadas en Caialuna). 
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1 El QL a mitad de precio 

^B grfeW'm^hosi'frasMddn en Es'panf"'" 
B de b, P ™« usuarios. el 

^H QL ha pasado de 400 iibras Aaualmentc el QL se cstii 
^H (92.000 pesetas) a solo 200 li- comercialiando al precio de 
^B bras (46.000 pesetas). En el 1 25.000 pis. en su version lo- 
^^ momenio de cerrar esta edi- oil en casiellano. La opcra- 
^^^^^B cidn. Investronica no sc ha cion de icconversidn la leali- 
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SISTEMASMIDI 



is MIDI prerende fad 



1 MIDI: iattija- « P a,] la "e.icidn y compo- 
n, sinretizado- iK ™ 50n °" ( mL " ic »l ™" 

lecnologfa (induido el Spec- 





TECLADOSPROFESIONALES 
iDONDE DICE QUE 

UO VIO? 
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ORDENADORES EN 
REUS 



tcl.yuno30 10 51pMlasl 

El conocimiento y 
su ingenieria 

El pM> 



Lmvtrsidad I'nliitcnit. 
l- Madrid. Facu.1u.id di 
Informdtica. Km. 7 de 1: 
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ZX (mrrespe.nB.blcs) 

BmvoMurillo, 377, 5.", 
28020 Madrid. 



i:ui<m v Rocky, bs chirm mic ha creario un nuevi 

k- l>ill:ni]u; viii'h.n : I.l ^ i l, [ .. j i ^ i/.fru ,;/; i.i>rj 1.1 idi: 
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.If ih.i'i- .diiiiv."' 
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■ntactar con la Mansion 
inimic en cl iclclbno 
5 00 07 dt Madrid. 
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SPECTRUM 48 K 




Bravo Murlllo, 377 . 28020 Madrid / , '' 



DISCOS 
DISCOS 
DISCOS 
DISCOS 
DISCOS 
DISCOS 




Un Spectrum y un par de juegos es 
suficiente para pasar una buena tarde. Pern 

esta pequena maquina es ante todo un 

ordenador, y como tal, esta preparado para 

afgo ma's que la utilizacidn del comando 

LOAD " ". 

El Spectrum no solo sirve para jugar: 

itambien permite realizar un ranking de las 

mayores puntuaciones obtenidas en su 

juego favorito! 6Que le parece si para variar 

lo hacemos en disco? 



pea 

V_> las dist 



miovdmi o 50.000 peas 



nos hablar dc 


dc perifcricos para alroaccnamicnto dc 


adicioral, /w/«*, compatibiltd 




daros que no sea cl tosituc: Microdri- 






ve, Wafadrive, Invesdisk, Opus y 




',!'..'' !',,' 


Discovery 1. Dc cstos, los dos primc- 


- Ademis de las careerist 




porre de la informacirtn, mienrras que 

isv uoidades icsidccn claumenro dc la 
capacidad de memoria externa (de 'JO a 


sii;^ .kl H|U1|MJ. Il>v que rr-nere 


zzztz 


ia el isflwr*. Todos los folic 

■ IdSi^LiijOperaiivodclaUn 
disco. Pot regis general, cuan.o 




MO Kbytes por unidad) y en los meno- 


., ,,„;, umiLd 


rc* ricmpiis dc acccso a la information. 




cn los discos 


Es decir, que se puede mancjaT f>randcs 


— Enlasiinidadesdccimac 


ci yfcw ^c 




Microdrive y Wafadrive, no 




tiempo. 


lie Tr.-.liai:ir ilireciamenle con a 


pr:-^;nl.f u- 


— Eo la eleccicin dc la unidad iam- 






bicn debe lencrse cn cucnta las carac- 


les en e<Vli>p> maqinoaj. J.-.s 1' 




lerfsticiiK del cquipo al maraer. del pra- 


Lie ill^c*:- r < ;l 1 -:"i j. i r". in.kf ^L'llienl 




"m™"'" WAFADRIVE 




MICRODRIVE 



DISCOVERY 1 
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- I iii.l.i.i: di^Ln ?■ p:dj!''.i.l-. 



— Monnrii: 100, ](JD, 400, 640 — Archivos secucocial. 
Kbytes, rios. 

— Software: imlickcks j aplicacio- — Memorin; 160 Kbyte 

.in-.:: ;i|''i..;iiii.in.^. ]h.jIl-sio- ncs profcsionalcg. — Software; "rilb'Li.ki:. 

— Pterin: 85.001) pias. (160 K) y — PitttoSaiMOpHs, 
,o: 30.000 pias. 95^00 ptas. (640 K). — Fabriamte Tcchni 



- Motions: 90 Kbytes. 





Listado de un programs de archive 


100 


Dill *"ARCHIVD" 

Se crea un fichero con el nombre ARCHIVO. 




105 


OPEN W*l: "ARCHIVO" ;R; 100 


Se abre el fichera ARCHIVO en forma aleatoi-ia (R de 


Random), con 100 bytes par registro. Se le asigna 
el buffer 1. 


110 


INPUT "l.Entradas, 2. Consultas, 3.Fin"jx 




120 
1000 


G0TC1 X*1000 

Salto en funcidn del valor ds X. 

REM *** ENTRflDA DE DATD5 *** 


Comentaria. 




1020 


INPUT "Registro a grabar'-jV 
Peticiiin registro a utilizer. 

IF R>65535 OR R< 1 THEN B0TO 1010 




1030 


CLS 

Limpi.eza de pantalla. 


1040 


DIM NS<30>: DIM B*<30>i DIM P*(13)i DIM C*(25) 




1050 


INPUT "Nombre?")n* 

N* para nombre (30 Bytes), 


1Q&0 


INPUT "Direcciiln?"|b* 

BS psra Direccifln (30 Bytes). 




1070 


INPUT "TelSfono'^p* 

PS para TelSfono (15 Bytes), 


1080 


INPUT ,, Dbservac:iones' , SC* 

CS para Observac.iones (25 Bytes). 



1090 PRINT *ttl;n*+bS+p*+ct| AT r 

registro R. Solo se puede utilize 



2000 REM *** CDNBULTA DE DATOB i 







Lectura 
bytes). 


2040 


CLB 



2060 


PRINT AT B,0; "Direcciin: ";a*(3i TO 60) 
Imprpsifln direccifln (Bytes 31 a £0 de A4> . 




2070 


PRINT AT 12,5; "TelS-fana: ";a*(fcl TO 75) 
Impresifin tel^-fano (Bytes 61 a 75' de fl») 




2080 


4 .„ 0b , H 




Impresi 6n observaci ones (Byt&s 76 al final). 




2070 


INPUT "Enter pars seguir";LIN£ H* 








2100 






CLS : GOTO 110 

Limoieza pantalla y vuelta a las opciones. 




3000 






REH *** FIN DE TRABAJO *** 
Comentario. 










3010 


CLOSE tt*l 





] CLS ! PRINT "Trabajo terminado." 




Vuelta 



d$ educoodn! 



I:h inform-jliiii l--.ii; pmj may ilejirisu. Hi 
avitna tnJiotojiico a tan fucrte que aptnas 

telle"!.-,., liftniia limn asimiilir ins linens 
priid/Miri );, in que es mas important!, mi 
pm.-ini:r,'iiiii:s di utilisation para nuestra; 

Este es tl case patent! di las escuelas. La 

explosion del urdenador personal o 

domistim de bajopncio ha becbo que 

numerosos es/ndiantes sean poseedores ya de 

mi ■irdwddur en ins tains, mientras en las 

co/egios aim se disaiten sus posibilidades. 

(.■ii/nni.vndi o:n in .. vuelta al colen, ZX 

ha qiserido esludiar mis de ana el 

problems, y para elln nada me/or que 

mmenzer con el artitulo lit ordenadnr en 

el aula, de Isidro Ponce, pnjesur de 

EGB en Vimbodi (Tarragona). 






hEIL 



wnotidti par todas par su tortuga, pero aiin 
desionotidn en cuanto a sus npikarinm < 

Y para que la evuelta al mien no sea una 
pesadi/la para profeiores I alumnns, 

/iii,i/i:yi"n,i ti::: nn;i uiiihidu selection de 



Ita 

cole 





Spectrum 
en el aula 

Pmic giiir un riimo flexible de exposition. 



It c>.|HiMc]r'n dc los concepts. El pro- 
Fesor dispone ik 1 un ^pnne iii.Ll'ia- ra 
clonal c indcpcndicnic (programa) que 

itiiiri: riprarion por bs ninos. cspc- le permile comrctir rnuchu mis dirct. 

' 'menle en mateinitica'.. MiurrialbM Tjmcntc d jpn-ndi/jje y la capucion 

cllo que cl profesnr inier 



pcrcinidas a ninjjiin s< 
dad. 

Algunos profesion; 



- ■■:■'■ ■ ' ■' ; 
















r'oim.i .ilnolul.nn.Tuc dirccra jr eficaz. 
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— Como repel irlc.r :rii-.i n i.i h^- [i.,t-l 
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i til evaluative*, pra que (1 raismo 

— GmiO inscrumento dc recupcra- 
a. in. Mediant Ins prugramai alcfecio. 
I> tee uperacidn K consrimve mmo un 




TOJaflaPBC 


Pan que tculai la? posibilkl.i.L- ,ui- 




:i , |L 


i<x dlailiLS comliluun una rcalidad. cs 
evidenteque no lirvc cu.k|uicr pruiir.i- 












li.n-.l sus pr-.»:i i '.i ' pi-Ok'iMii.^. dv .leuer- 






du con Ins pemli.irt' cir.uieiT'Mi^^ dc 
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GRATIS 



BASIC 



INFORMES 

LflES COMPUTER 
=■:■;:■:•; :•■■;■"" 253 Efl44 



Empresa importante necesita 

PROGRAMADOR DE 
INFORMATICA 

con residencia en la region manchega 



- Dominio del [engueje BASK 



£ educacionj 



Test dc conocimicii 




da arierm T ™™ «" £ P=jjj 


,.k l-.-.i [inilsjcrll.lf ■■!■.: -:Kllt 111"-... >.l line 
ilc.-rn.Ti .kI.i |ir ji'c tanlu :il pmpip pro- 


Desarrollo de una clase 
enn avucla del ordenador 


■e del alumno. 1= adjudicacidn dc 






y cl bsrcmo correspondent!. 








4) Test de re cupc radon. Cidi 


rendimicnio siguiendo la mcrodologl 








Tesi dc ejereicios models. 


cuperacirin que constara dc una sfnre- 


en una clase dc 25 d 30 alumnos la si 




sis del npsiraidii 1 (cxpusi. ii.n .It! 


guicnic dotation: un mfaimo de ire. 


K"k'ln pl;irilC"nlnS |l:l!i<l il past) 


K,ni|, una parte- Jl-I iparur.l.. ?. iii-v .1.: 








color de unas 27 pulgadas o ma's-, un 


ncdianre el pmcesn u piocew. 


do 3 (Mil dc cicrci.-i.i-. model..), l-.-u- 


asnllt, una imprcsora y los prorjramas 


ivos, dcsglosados y apoyados en 


ran de reaiperacidn debera set lo mas 
siniciiiado posible para uuc pcrmita al- 


IsidroJ. Ponce 



PROTEJA SU SPECTRUM PLUS CON ESTA 
PRACTICA FUNDA 



A UN PRECIO ESPECIAL 

OFERTA L1M1TADA 
Y EXCLUS1VA PARA 
NUESTROS LECTORES 




Aproveche la oportunidad de mantener 
como nuevo su Spectrum Plus 
con esta funda, y beneficiese 
de un 30% de descuento 
sobre su precio normal. 



IMPR1 



ESORAS POR ARRIBA Y POR ABAJO 



en uremtaciones 







&&3 



Autoevaluacion 

El program* AU I'OF.VAl.U A 1 

:iON,.con,., ,ill»d,„,. „■ 
» I n m bl„ n , I nd,»..l| 1 «,- ,» 



HI programs pucdc so 








SUSCRIBASE 
FOR TELEFOWO 

* mas faeil, 

« mas comodo, 

* mas rapido 



Telf.(91)7337969 

7 dias por semana, 84 horas a su servicio 

SUSCHIBASE A 





1060 

Sinclair 



Enisten muliitud de Ipngiinjet de ilraiw«-i,lii iL [.is Iniiiuajm infer m.i- 

programacion, tada unci dc Ion [icon. 1,3 mayorfa dr fas aficionados e 

cualcsha.'.idiimnccbiiiocon un iilcluKult In:, i-md 1:1 rites ill- i rifornl.it i- 

fin concrete; por su aplicacidn en d IB- co denconoccn b que « d LOGO y 

rrenn education nns ncuparemra dd s>u- pu'iliiliil.idis. t-om.i Icnpiajc. A lii 

LOGO. mavor/a les maa como una pane- dd 

Fueen l9S3e™nda K.S SOI.I de- PASCAL como en i> seccitin TUR- 

. sarrollaron un LOGO que en 1084 fiie TLE dd COTtplhdor de Hisoft. P«u 

'J'fr'/lY™^ ^' \ > 11|W " ' n,i " f 1 '" Sl,,dair * '''"-' : ' 1 ""' 1 ™ LOGO no " un meK> P™8™>* P" a 

^}r J UOS^Ipr . . . I'?S ; , n.is I1cj;:i .1 r,M.oiri.s ton d 11T..I,. ,-r, .in.- -si ,k ■ s^.il !.:.». ano que es un po- 

^edUCaaOnl.r f deLOGOCasidhmn. teme lenguait vcrsacil, y con unas 

Si ii> y Pero. cque es LOGO? Es d gran grandes posibilidades: Uibuisir, escriliir. 




Hablando de education, no podia faltar el LOGO, un lenguaje pensado y disenado para las 
aulas. El LOGO del Spectrum ha sido reallzado por Sinclair y recientemente traducido ai 
castellano, pern con una gran diferencia respecto al anglosajon: su reducido manual. 
En los dos articulos que siguen a continuation analizamos las posibilidades de este lenguaje. 
con un especial entasis en la recursividad del LOGO, una de sus caracteristicas mas 
interesantes y al mismo tiempo mas desconocida. 



LOGO Castellano es Is version 
eutelhna dd LOGO SINCLAIR que 
tan hucna icdjpda nwo en el Rcino 
Utiida 

LOAD "", JfunCL un.i p:i'nulJ:i ,k- |.,,- 



la Gl'IA DLL l.'SUARIO ( gi 



LOCO (PRIM ITIVAMqi 



■i i-..Mij|.|i,li,i qii.- PARADELEj !<l-'..\R:i ; RASE d proccdimicnre. no funcionara" | 

-I.OCO m, ,W a SI !-STA.VAaA^KASE|AI.Tn| muchnquc b .memem™. 

, Incite « da ci IMPKlMKPRlMF.ROiFRASE Poroira parte, yen el <nmarit.nV 

nasi manlieoe qoe DELETREA MP :KRASE das iditoras aparcccr SYS S que par. 

as t numeros son KIN >er anula el '.W/ ptro por mas que r 

ia forma y ello cs ramns tl n. la. lo ilicha tecla no apar. 

,s ilX-mowl," ina til <lon,L.fHAS|.: w r.-ti.r,- ., nn.i , a- I -\PS SI ill-'! + SY\U« it. SI IIFT. 

ia i> mis enr-ontra- rialilt tnii-mus .!«- Ji.iinijuir si la VI- La iraduccirin ricl injites PKIi 

wrama no va. In- liable c-s nmn.'rica o allanumeriLj. si e. apar,:ei- tun Jos vcrsiones en caste 

alal.ra po. palahra miinviica kislara eni.aml., DH I'- n.. :(*< Rllif- <|,i,- ramhi ; lie Inn-, 

■■-f.irin mt.-les. no. TRIE'S 1 2.14 S, si ,-. a Its mi merit a liav IMPR1ME que mamicne d cursor 

c no corre lobre la que entrar DELETREA TAMA- lamisma Hnea has™ quescnmplcti 



o 

.-A TOR1USA HE iA VE«|(W 
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LA M(A £5 iA ESPAlffOifl / 
HO 5£ LEMA/ffl D£ iA 
filEJTft WSTA IA S£JS 
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U solucic 
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apcnassiveremosnad 
eclcar MTX +RNTE 


«■ escprocs 








on su definicion si sll 








tPJiCTS 


'b'lliiJil inl.l rllilllil.l il.- t \ 


TF.R, 






s, ,,,-, 




mttacfct la r'amnsa lo 






eomuMTyapanwii 


r.T,'. 1 !, 
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ri.ingulo u,uc IXjdrcmo 










Ml 


o AV 50) tviiunn S 


pasos h longga. 






IA "Ml (CD 90) gin 1 






















en (ionde n sera el rl.rmcr 



■a i-unoiidu tri BASIC, hips 



FIN- 
PARA REDUCE:OBJ 
S! ESTA.VACIA? lOBI 
|ALTO] 
ESCRIBE :OBJ 
REDUCE MUiOB] 
FIN 

PARA TRIANGULAR 

:PALA 

ASIf,NA"PALAiPALA 
SI ESTA.VACIA? -PALA 
|ALTO] 

ESCRIBE :PALA 
TRIANGULAR MP :PALA 
PEN 



PARA DEMOIMPRIMI-: 

iVALOR 

SliVALOR > 50 |ALTO) 

IMI'RIMHiVALOR 

DOBLE:VALOR + 2 

FIN 

PARA COBLE :VALOR 
SliVALOR > 50 [ALTO] 

!-;s<:r,,!E:VALOR 

DOiii I ■ :YALOR + 2 



PARADELETREAihola 
SI ESTA.VACIA? ihola 
[ilco] 



S1:KI-.S = 
SI iRES = 
PI NT A R 



"RESLCAR 
"R|AV-10| 
"8 |GD 10J 
"5 [GI 10] 
"7[AV 10] 
"S |SL] 
"C [CL] 
"X [CENTRO] 
"1 |IL] 



Kill .lui'i 






sal,. 



I \ ' M \ , 

•nriaw II. POSlr.lJiB 

pnr .Tempi.. 1)H'< KITA 

entrails el valor 255 en 

60000 

Lntrando ADIOS y ejec 
mnsde IX KM reromando a BASIC 
queremos vo.vei 
rrlian-rRUN. 



dilute tl us.. He prefijns (SUMA PRO- 
DUCTO DIVIDE RC2) que efeciiian 
to rami, el pmducto. division y raiV 

.11.1.1 r:li III ik'l i.liltiii Li ■■KjirliK imllL-Jilim 



PARA ESPIRAL ihidti an. 
AV :lado 

GD::in K ulo 

ESPIRAL :lado + 2 singulo 



PARA ESTRELLAdadi 

REPITE 10 [Iriangulo ilado 
gdM] 



cahnlii ni LOGO: SliV ). COSIAO. 

TA\c;i;\n-, cota\<,k\ti-:, 

ARCSEN, ARCCOS, ARGCOTG per- 
miicn opcrnr cro todss lu funcioncs. 



t- amtiltllr GUARDA p 



I-I.IMINARCHIVO "NOMBRE 
.TIPO elimina del mmdrim el archivo 

eiurdndoron \( I.MBR K. Si ripo no sc 
,:.i*-diir.i eiircrwlcra ijue es LOGO. 



LOGO 

recursivo 




ui 



Pur scr una dc las hcrranlienlas que y asl his 

liimliien hay que ilccir que. conforme Es (id 

avanza su dificuliad. su comprensidn lo que su 

ehos casos. con aficionados que elabo- rx>r dtar 
run proL-cdimienlos I partir dc copias doocaml 

IL-ptu miimpriruiltr t-n su rotalidai 
PropnnKamos, en un p rind pin 
ejempb send Ma 

ESC (FRASE DE PRUEBAj 



1 rh, L> I PARA COMPACTAR :I.1S 

;ltmo! lorcik) ci fl BStAVACUB iUS [DEPTJEL- 

[/E "| (DEKfJELL-'E P^IL/IBR^I 
ip... mUTi..,. v.r pR/MfcRO .| JS (■ 

" *** 



k- p.l I :ll ■]■■■ q 



] [-t. I-.L". Iiiti 



lukiilr, In visunliKirniii dc I. oration 
fRASfi DE PJUlEHA.Gula vei- que 

i-U'iiro-^ii' i'l pri>':i:iliriiu:nlii PIU.'l ■ 
R.-W-l LOCO mo-it raraclmismo resui- 
r .k!h. Sin i-inliiirL'ii. <ti»|>u<:s de la ins- 
.rueddn BSC podonoi tadoi* PRLlb 

PAKA PRUEBA 

ESC [FRASE DE PRUEBA] 

PRUEBA 

DANDOCOMORKSUI.TADO: 



r 

I'MlilSTHI-.S 


„«»«, 
















. ON. 










rp 
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III! ■. 






dostres^ 




Z~S 


;(S 
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— 11 


THES^ 
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l->i].,..ci.-SI 
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(■«(:oMr'A("iAR|i : \ni)sTKi ; M 



CCOMPACTAR [UN DOS TRKS] 
Con k instruction ESC, LOGO ini- 



Runda pila, junro a la primer' pahhru 

la pila 2. Pero DOSTRES a! anterior nivd. IJ liliimn 

. Iisui [r,(lavra r,,-|f.L.I,. Hi Kl it IS I,- ;iRr,[-H>,„- I \( 1, 
a pila 3, tarn- pasando UNODOSTRES a 



i ETC a 



compile! adon Jt 



mlo vi=! 



t. It* pmctJimicnlos que 




no loesta,rcsulla FALSA l.i 
LiiiTi y hc ejeculii las instruct 





GLOSARIO DE LAS PRIMiTIVAS UTILIZADAS EN ESTE ARTKULO 


Pasamos a continuation p 
don LOGO, primidvas, y 
ttzamoe. 


cntre pa 


•" to i ue "*&* 

entesis la abrc 


i.L^.,11 ,.,UL 


Z 


PARA ~ Scfiala el comie 
piocedimleiwo. 
ESCRIBE (ESC) - Escrib 
nea siguiente. 


zo de 1 
el obfe 


line 


a de litulo 
1. p.uit.11 


y pirn a 


i It- 


FIN - Palabra eepecial qL 
SI - Si el predkado cxpre 


e indica 


K 


nal de la definition d 

acion es CIERTO, se 

segunda. 


*- 


ESTA.VAC1A? - Devuelv 


CIERTO si 


el objeto o 


isla csta v 


.cfa. 


DEVUELVE <DEV) - D 

continuar hasra FIN, y de 


UtllvC C 


pre 


"come?™ 


ult ado. 


•'" 


PALABRA - Devuelve u 


:° hie, ° 


fotn 


ado po, I 


s dm pal 


OQU 


PRIMERO - Devuelve el 


primer e 


erne 


nto de objc 


O- 




MENOSPRIMERO (MP) 


- Devu 


rive 


■**" "'" 


8U ptime, 


ele- 



SERVICIO DE EJEMPLARES ATRASADOS 





Para hacer tu pedido, rellena el cupbn adjunto, 
cortalo y envialo HOY MISMO a: 

ZX, Brauo Murillo. 377 . 28 020- MADRID • Tel. 733 74 13 J^ 



° A ™" ean e >p 


■ a Via* a m.erba.k. 


Numero d B mi ta 


'> e '-\ 1 1 ii im ; rTTTrrrriiii 11 















Libros 



Graficos, colores y 

miisica en el 

ZX-Spectrum 

E. Lowy. A. E. Gallego. 

S. Mansilla. Coleccion 

BASIC. ED SM. 

142pags. 



ill- Ij L-tiii.m.il S.M. Los n 

ili-ri;!.],- Ji-I l^,.- ilium. Ij. 
iif. i>r.i(kiii v I. ri-jliy:ii.i.i- 
l : .i ciunfi cst.i iltiln-.iili. .i I. 
i-irin i>r.it'jcii do kmi-iono.. 






connEO 


oeS?™™ 


™" 


.ESS,, 


,». „ 


PTAS S 


"" " 


z « 


EUROPA. MARPUECOS "UNfc2 






RESTQ DEL MUNDO . 



».„„. . „, „.,,.. MM I I I I F .„. „. .„«„, 



"Sprites" y graficos en 
lenguaje maquina 
John Durst. 
Ed. Anaya 
Multimedia. 
184 pags. 




LLEGA EL 




jFACILMENTE AMPLIABLE A 360 Kybtes~| 

PBOGRAMAS DISPONIBLES O DE PROX1MA APARICION 



Contabilidad PNC (500 cuentas/4000 
Tratamiento de textos 
Camfaio de Moneda 
Control de stocks 



Facturacion 
Nominas 
Base de Datos 



[PODEMOS PASARLE SU PROGRAMA FAVORITO A DISCO] 

DE VENT A EN LOS MEJORES ESTABLECIMJENTOS DE INFORMATICA 



DlstnSuido en Espana poc [««f U"« f| SISTf MAS LOGOS GIHOWA. S.A. - flvto. San Narriso, ?4 ■ 17005 GIRONfl • Tel. (972) Z371 00 



Lectores 



K 




romidealimriii.u-i.iii, ' 


Pregunnail.arutinaKOM 


Prcgunla: -Xuindovan a 


drain; nivel, loscuales, 


CO neota.'laZX-Primc-r 


iiS536-L : SR79S2dal» 


|uU:c,ii un programs dc 


mirujUL i.icrifkandoalgodc 






.:|Li[-Kvr-( Ulil -v l.l iLIJL^Li.ii': 










ii-;ul-|i.i lu.i, practicos para 












que dan cl mrmnit 4 <<<„: i 








«!'!';»',■ i:.:m rcsultados dc 








- stu ruunii L|llL- 111. 1!.. Ill Ij.Jt 


Pablo Micr 








Gijon 






■ii lay ;di/una rutin* mi! 


lie -put mil: l:ipLT.il.';i-!i,r- 


- jk i"i"'i'T'- i P'- | .r iT " 


SEEKS** 


riuMeriic-tesenlido? 

Jo-ir L U « Rubin 
Zaragola 




I're^mitn; 1 engo un 






S^a-mm 48K y qiw 


Porcjemplo; In HUNT 


csos castas dispusieras de 

algo dc memoria librc, la 


JfcsKiiipo.pcropiiwre 


inipresoni ZX-Printer; el 
imprcson para rcalizar 


Corran el programa. al 

pmiUT.W(V. r iikrnl.A[ J S 
SHIlTySYMBfll.SHH-T, 


kIi-.h un [iruRtamaque 


alguna operacidn con ella, 
cl ordcnador queda 


\ ul ■jpart'i.-rr en la linen. 21 
oiriivczRUN(?),pulscn 


pr.-.^r'm.d .|ii.- .!.■ ■.] r:1:.-il>..K- 

de error gnatara, al 

DlM.r.-li-.i.Pururnpurtr 








hUimiucionesdelongitud 


ninguna led a y la 


...V i!i,...i;.;iit. por favor, que 




inipre^nra sc pnncen 


csloqucs-iriquererrie 
hrcho aparceer en las dos 










pant alius siguiemes. 




un pMRr.imj qut otup.in.i 


elprogiamaintroducido 
jengo que borrarlo al 
queda r parallaado el 


Dani Cunill 
Banyoles 


p:ir:n-=c.:u1.Lruii I .nn ! rari.:i 
p.iiii^ealcuios.ni.-inr,'.. 


■.■,-h,r!.,dv,ii<,r:.u!"ji:iL-,iic 


Spccirum. iEs liSgico pnr 




comopjimeclcirlo.De 




llt-sput-nlii: 1 .' clc.Ni que 


todasfbnmuBttn™ 
prcparando algo muy 


enchuiar cl ordenador? 


tmi.il.-lriRDMqiicli.ia 


s.crc.Dc ' 


especial en ewe sentido, 


David Carreras 
VilanovayUGeltrii 


qucsipulsamoslosSHlKT 
cuandusenospreguma 


:il..-.|ii.-..iiir. l |lirpucdi! 


complete yefectivo la 




haja dr la pai.lillla lo que 


me Cll " D 'en"' 'n' '»t'> '■'' 




Respuesta; Es 






esperar, elai™Wtro 


pcrfectameme Idgito que le 


area de editar 


ejecutarse. 










L- s ia[Miiesperando,eW),De 


strfg que no teocutrie™ 


D ,dc. n i,!lroducid a ).A 





UNICO que el 
microproccsador puedc 
engender. Todo li.qui- 


i:i hum lie concciar 
cuilquier periftti™ al h„i 

que .juierji iniprimu- .lliin ; 


programador han ido 


imprcsora.debcmssalvar 
cncintaloquequieras 



PreEUtiIa:-:lnfluveel 
CBM-04 en In television 
cstropcandola dc alguna 



tranquilidsd. V«B5 como 


[version ompliada del 




ory 


en poco liempo se haran 


anterior BASIC dc 






amigos inseparables. Ln 




nadaiun programa BASIC 




due que ic pond pasar cs 




hailiUKll. Ill" tllll:!!, foHlliiS 


Prcgmita; Dianiria v,ibcr 












l"uncioi-faraiittindQL.ais 


N". proiTninias BASIC 








ultiiit" p.ir.i Spti-lrurii -in 




j[ ..tmi: publico, (locual no 




k,cert.i<imi«lilk.i<:;..iK-, 




cs nada grave) y comience 


Jose Luis Ania 


aunqucrstcmododcatr.ua. 


i imascrisihilidadde 




Gijon 




en.radade 10(1 un uilire 








:=.llk.!>i|opr.|„!a!>p.r.l 


abundances recaidas dc 








..programaebnitisr., 


'mll'i piiLik:. pr.-. : ji.ili.:Li ..1 


"'■■"l""''" k, ''* dos 


JosdAlmodAvar 












ik un Sperlrum, el Super 








BASIC no solo es una 




Respucsla: No debts 




version ampliada del 




"''H'rninpinprablcmasi 




BASIC Sinclair. Sus 


para que nil Blip la perm 






diferencias son multiple? 


siquicra pensar en 


e!lo,nielordenadornicl 


PrtgunituHelefdoqueel 






amplificador pucden 


nl.utili/acl Super BASIC 


programacioesaquerodo 








...Ml 0RDENAD0R ES SINCLAIR, 
Ml SERVICIO TECNICO ES HISSA 



Y es to logico. Si has elegido el mejor 
microordencdor del mercado, no vas a 
repararlo con cualquiera 




Y recuerdo que no tendras 
con el precio. 

"COSTE ESTANDAR POR 
REPARACION" 



Solo Hisso te puede garantizar 
lo utifizacion de piezos ohginales SINCLAIR 
y expertos tecnicos en reparation. 

taide a la delegacion HI 




Lectores 









: 








/ 


■ 


comoloqued^eas. 


cualparadprdgramador 






i-.'pcramo. i|ut <i .lijjuni' Jl- 










:[-j'."rivi.1i.''. v ijiiilTi". -.■hi r 




I'r^um.'- -\:i.-. :■■■■ -i 1 ■ i ■_ 




luMiinliuius que hay en la 




cnpocosminuios Eln 






i,:l|iik;hI:11.Ii:Kt.1j t i-tilMn 


n.odclo (Plus) aunque 










saliJasJc TVdclos 








i.h!..ii.:i.''.ir , -i. , !i | --.i r.: !■_-!■ ■ <k 


























Prcj-uma: (Podrlan 














■ -i- Lnih l.-.r IlLL-'H'i'' i:i>" Li. ■ 










ATTRBldZX-Vclrumf 


"-"^"" r '"" 




Luis MciIki-o 


Macario Sanch^ 


Prcgunla: ^Hasro que 


Prcgunla; Si quiero 
suprimir las inslrucdii 




Madrid 


j.untocs normal que el 










Rcspucsla: La runcirifi 


rzT 




■ "■'■ ■■ "■' ""'■'«" 







del PEEK. 






I,.,],',,, „.,,., 








r-ipitla, por lo 


LircuLii-TiL-riK: 






con suprlm.r 






• SINCLAIR 


♦ DRAGON 




» AMSTRAD 


♦ IMPRESORAS 




♦ COMMODORE 


• MOMTORES 




♦ PHILIPS 


♦ PERIFERICOS 




♦ CANON 


♦ LIBROS Y 




♦ SPECTRAVIDEO 


REVISTAS 





ESPANOL 

SI, VALIA LA PENA ESPEBAR... 

79.000 Plas 

— Garantia oficial. 

— Aplicaciones para arquitectura. 

— Programas de gestion. 



SERVIMOS A PROVINCIAS 



. (91) 332 57 37 



W§HII^ 




MENSUALMENTE 
PAHTIDPANDO EN NUESTRO CONCURSO 



s programas que 



ZX promiara mensualmen 
liagan llejrai- los lectures. 

lara partkipar en esle concurso abierto. 
aficionado a los ordenadoves ZXtfl y ZX Speeti 
debera hacer llegar a la redacei6n do la 
re vista el listado. un cassette y un toxto 
explicative 

Hjntre todos los programas que 
rccibamos cad a mos, scran scleccionados 
para su publieacion aquellos quo reunan 
los sijtuientes eriterios: 

— Originalidad <Je la aplicacion. 

— Simplieidad del metodo de pro^ramac 

ija uniea eondicion para participat- 
or! el coneurso sera quo los programas 
no hay an sido publicarios proviamente en 
ninguna revista. 



UN ZX MICRODRIVE 

sera sorteado cada mes entre todos 

los programas que recibamos, 

con independencia de que sean 

publicados o no. 




Lectores 



operative, (y la consiguicntc 


WOO LET i=Z3760 


Mre.-criirittHMjviy..|>;it;.l;i 




9i>UJl'(iK i=l-SKT'Hi 






USR"a"+lli8 






9020 POKE y.PKEKs 






90.10 NEXT y 


programs que uiilice 




Otto meiodo serls 


DATAs. 


^— 


m.idifiear la variable del 
sistcmaUDGiPOKF. 


^"cr^IdS^ 




23675.208: POKE 






23676.92. 


quercmos ulilizarla con 




El rcsuliado esun gran 


csic. modificar las llneas 


Prcgunla: Un pequefio 


ahorroderrierrirjria,muy 
utilpaniellCK. 


OOOO.GmibiandoliBpor 
238 18 des puis delta her 




uliliddo cl Interfoit 


'7n'"'n.',^^hZ~^ 


Julio Garcia 


(CLEAR bisTara) a 


luO.'IXI.criLiru^riicnn:, 


Tudela 


jisn.umPRnG. l.-"tia.,tnr. 


REM (sus dkliRos 


ResputsTa: Annuli-ci-mm 
qui nr, .Lin.ifjlemenie 


al .scgunelo paso debcris 


Tumcr^^cmiunb^ 


r"!'ilnm "■"."" Ill J™,:,. 


9020 por 
9(M0FORy=0TO1(i7 


ones ndmcro*, conlo que 
El«honDlleg«»l30pOT 


1 laiioi de hater aigunos 

|-l:,|-,on... Icr.nmnrl.il. 


9020 POKE USR 
"a"+y,PEELK (x+v) 
Deumiformil 


1 ]U-Mi:riinio*esp»cios 

rraninlaliik IW pur:', ti.'iliif 
toi UDCs) 


''■' "-.'m.iy.jM.letoque 

sullen™ DATA Ins 


primer >-;tlejr iirqiL-lni.. I(i 
vi-Cffii. Dt rodas formas 




tins inrt-Ln: iii.^ ek.L'.m'L- 1 


Ruiina: 


.i.lini. 1 . ilc Iia .1 1 Imi.-:. ilt 




9000FORx=23760TO 










que par a cl laierjmr 1 


9010 READ v: POKE x.,y 
9020 NEXT y 




cjuedarlie-Cl.EAR 




I'nkll '.VwS.KlPOKF 


9 1 00 DATA., 


tum.i Iliit.ui.te: v el niditrji 


23676,93. 


M^imcloptsD^borrala 


tD .r<. S pondiem C (N).0,e;i 




Ime.i.diDAI'AHyl.inmna 


que cj ahorro ilcanisi un 90 





GoldStar ft!!MZ commodore 128 




£. y lambien SPECTRUM QL. COMMODORE 

64ZX SPECTRUM. 48K SPECTRUM PLUS, 
AMSTRAD, etc. 



COMPUTERS. S.A. 1','di'i 



CONDICIONES ESPECIALES PARA DISTRIBUIOORES 




que son Ins mil aSmodas 


lotalmente igunleffl 1 


por csiar en la parte 


Robert:! Mufi 


inBm'orikitdM del teefada 




Amtto Ballet 


Rcspuestn: Las sentencia 




Ki.-spui.-sia: I'aracllo 


nos permit™ guardnto 

liirri.Lr .lU'.hcn ill.- iiiuikti 


c^Zk^LTfom. 




,l,':pi ;imi ,1.1 ur. !:■!.■, Ii'l. I v 






L-ndiiNitirmJciunio. 




pucruxdecnir:i<!:i v -all.!: 






DlfennduH emra 


l omiirii,-.u-|.-.n(c]ick't<M], 1 


PEEK-IN ) 


t'ifHTIOilini.t'iL-.). Pi.rtrlki 


POKE-OUT 






0l m C l«i r n™,i, lii.l 


Ptegaota: iBjtjston 


rucHSJics (OUT »l altav(K. 



¥ GARANTIZAMOS la 



HAGALO UD. MISMO 

AMPLIE SU SINCLAIR 16 K a 48 K 

Pof 7.50Q PTAS. 



ULA 

CPU 

Transist ZTX 

lm 1889 f c o» cenPi/reei 

MEM3RANAS, etc. ( s£*vi«, "As K" 



COMPUTERS SERVICE 

Corcegs.301 -Tel. 207 11 16 -08037 BARCELONA 




w 



I ENVIAMOS CONTRA REEMBOLSO 





Spectrum. 


siKuieinckcomrnsarioiquf 


DIVERTIMENTOS 




'II IQOREM ("jimlrtn dc 


tsnero Stan Ji; iiiiIiiUI |'i[:i 










mcKjuruo. Extra; 400 pi 


i'[i-l>istn.i: ■<■ 'imrj put. Ir> 


MIMHIM'in "(.nmbiiir 




Promercn: 


S'Si-i 




SOFTWARE 




WHlU-xl<0ORji1> 


MAGAZ1NK 


Prcscnian: 


■ i..]:i.' [VI ri'.- ill- I' ]',ni:.ill.L 


ORvl<0O1lyl>3l 


(MONSER) tnocjiiuo. 




sinuBaiCLS,«*adl«n 


THEN GO TO 9010 


Promcicn: 


rcirasadosmtntiiks.™ 


peiderd rcxiongnifia)!: 
quchayaenella? 


911.10 INPUT "llasrarl 


2 super jueBM 


ai sterna mas lento 


"l*2f.>2 


FULL-MEMORY 48K + 




"(141 Ml \2<l.KlItx2>2:> 


rinravir|;atde regale. 


orrtigruffa. 


Manuel Herrrra 


ORy2<UURv2>31 






Sgvjlln 


CHEN GO TO 9030 


Presentan: 


ORDENADOR 




')I>5U INPUT "TinraJ: 


2 mtiliocrcs juegos IS-Kde 


EDUCATTVO 






(MONSER) numeral. 




M6Q INPUT "PapoL 5 ! 


Jthldamentt cimilBatfcli. 


Precis 495 pus, 


P,,,lr J ..l: 1 ,n.,t| J o,i,(;iJ 


"Sj»pd 


RnlacMaiulBdeimode 


(Soy profesnr de 


SlU'XlW.SiiinuBdeellt) 


9070 INPUT"Brille?; 


cllos u|wrccc lachado el 


maiemirtras y nulmica 


defines las variables 




l(p-K ild original (les 




correspond it mes puedej 


SOBOINPUT-Flasbft 


adjunro cariiula). 




suprimir Ins linens 


VlMh 




P rum e [en: 


')illHi.W.U.asvarialjk-s 
ileyldtbenmnlcuerla. 


9090 

9100 FOR n=xl TOx2 


VIDEO SPECTRUM 


3 programs educative. 
Prteenlan: 


cooidennd«s ilt la eaquina 


9IIOIT>Rm=vn'Ov2 




Iprogramassobrctem 




9120 PO<E 




culturalesd*NULA 


Ik deb^im inferior 


20 S4+fl»*^;l28 
1)130 NEJi 1 in 


;;;,: !x " ilc - o ""™ wu 


urilidad didriciica, 

esped«lmcnte el sistcm 






Lacaratula rccoge 12 


periddico. lento, auurn 


,„npl,: ,.■.,-, Ha, med.an.L: 


9150 RETURN 


palilalias dc iuegOi 


sin una presentation 


.d"!K!>:>. .lllCCt.UlKTlFv-.n 






com pitta rJe In tahla. Ka 


el jrehwode MrtboKHi 


^^^_ 




las valencm. 








EJ tcreer programs. 


HAMC sea ,m p.irn Itnra. 




III |imI| |LIL|'.,- 1|I|I\I|i|||-. 


TRIGONOMETR1A. 




TOMADURAS DL 
I'KI.O, porno due ir 
ESTAFAS.perownie 



Kesputsis 



(omagra Jetu^ftlMn 
Sttlt diumriL- eoemigtM 



p^mB 44^43 del 
21 (Ageism), con d 
wBiiron Rajon. nos< 



I'rcfuiiia 



Emprusos de Sopone 

I.-. iM K(l),c 

VclJzque?. 124(Madrid). 



leempenUxm 



Sabadcl 



•ri)nrnm« come re him. 



eTudavia n 



GUIA PRACTICA - GUIA PRACTICA - GUIA PRACTICA 



HiHRiYtninn 


lf= 
































E}»t 


■ v ■ »,■ jtt^tttt^m 


wk^MlHiZLUMis^mm 





UNIVERcT^SOFT 



CAULDRON 
FORMULA ONE 
ROCKY 

HORROR SHOW 



I. JATIVA (VALENCIA) 






HACEMOSFACIL 
LA INFORM ATICA 

•SINCLAIR • SPECTRAVIDEO 

• COMMODORE • DRAGON 

• AMSTRAD .APPLE 

•SPERRY UNIVAC 



E 



ELECTRQNICA 
-SANDOVAL-.- 



DISTRIBU1DORES DE: 
COMMODORE-64 
ORIC-ATMOS 
ZX SPECTRUM 
SINCLAIR ZX 81 
KOCKWELL'-AIM-65 
DRAGON-32 
NEW BRAIN 
DRAGON-64 
CASIO FP-200 





- CLUB DEL JUEGO - 






iS 






HSrSSF" 






«m«* 9n,,i " " UBStrt> C " , * ha9 * ^ P ™ 






ME LO ENViiN A: 






ENVPAR a: CLUB DEL JUEGO 





■HiH.l-J : U4mWllMJ ; M4m»IW.lJ;!:!.WWl 












(^CAMAFECnc 




/0\ TELE SANT JUST 

LE OFRECE UN NUEUO SEHVICIO 
SPECTRUM, COMMODORE. 




* ARTO ^ 

tOS ESPECIA115TAS IN INFORMATICA 


CAMAFEO™ Dcp.02 






„ |ff rlf 







ZZS? 



ANUNCIESE 



MODULOS 



MADRID 
(91)7339662 



BARCELONA 
(93)3014700 




jiirgi: Serrano ntis li;i 
itmiiido un programs 
util para liiiniliLiri/LirsL- 
con los microc/rires y 

LOIUKlT ;l i'oiltli.) sus |K1 

sibilidades. 

Al ejecutado. la pan 



la ultima, que sirve r. 
abai i dimar el progra: 
lixla.s dan acceso a i 
nils st'tuiubriu.s i 
nuevas ope I ones, to 
fonnaioar, moairar e 

logo por impre.sor; 

pantaMa, Usiar (ichei 



meme pr.iix'jddav. i.... 
diaiiK 1 Hii-nsajt-s tlf ad- 
i-LTii'iitias y suliukl dt 
lOi'.ininaciiin para toil' 



5 


SEM n 


CRD 








5EM *» 














IENTO MICRODRIVE 












9 


*EM 




Sept . 1 . =94 


IO 


*EM ** 


**** 


**** 


«**««**»*** 




CLS 










PRINT 






MIEMTO DEL M 


ICR0DRIVE" 










PRINT 


























men u n i av 


ER 1 








": OVER 


55 


F P I Ml 




-z~t: 


.- CAPTUCHG" 


60 


PRINT 






.- FICHERQ3" 


£5 


PRINT 






3.- PROGRAM A 


S" 












PRINT 






4.- SALIR'' 




INPUT 




4t FLASH l; "0PC10 


N"; FLA5H 










LET n 






IF n 52 OP n 






=0 TO 


















REM 






™™„ I5 ,„ 


□ DE 




JCHO' 
















= 208 


PRINT 


AT 4 


.10! 


W • Et « l"i 


OVE 

ER 




r 4,1 ° 










210 


PRIPIT 


AT 7 


.Si" 


.- Farmatear 


211 


PRINT 


AT = 


-5: n : 


.- Listar oa 




tails 








21B 






l.SS 


3.- Listar P 


or I 












---"- 1 r r; 






4.- F.tagresar 


al MENU" 








220 




TAB 


4: FLASH 


N"j FLASH 


->,0* 






225 


LET o 


=CODE 


□*: 


IF o>52 OR o 


■:49 THEN 


SO TC 


220 




230 


if a* 




THEN 


SO TO 1000 


231 






T HEN 


GO TQ 2000 


230 






THEN 


GO TO 2500 


240 


if as 




THEN 


60 T JO 


245 


GO TO 








250 


REM 








300 


CLE : 


PRIf 




Tfi AT ANIENT 


DE 


F- ICHkRGS" 


































OVER 1:AT 















ER 


PRINT 


i PR 


NT 








- Sacar Capias" 


! PR 
















ntal 




NT 




316 


PRINT 




- Listar por Im 




ra": PRINT 




318 






- Borrar"! PRIM 














5 


- Regresar si <1 


ENU" 








320 


INPUT 


rAB 4 


FLASH li "0PC1O 


N": FLASH 


D* 




325 


IF 01- 


5" THEN SO TO 30 


330 


LET op 


CODE 






° THEN 


SO 


3-20 


340 


SO TO 2500+ 


VAL 01*500) 


360 


REM 






400 


CLS : 


'RINT 


TRATAMIENT 


DE 


PROGRAMS" 












™o7 


p"nt 


*T 4, 


0)"M e n u 3"; 


OVEF 

ER 




! 1 PR 












- Sacar (Load)" 


: FR 


NT 








PRINT 




























417 


PRINT 


4 


- Harer Cppta": 


41? 


PRINT 


3 


- Represar al r-l 


EMU" 










INPUT 


TAB 4 


FLASH li"OFCin 






<3t 




425 




■5" THEN GO TO 30 


430 


LET op 


=CODE 


OS: IF opi-52 OR 


op--; 4? THEf 




m 420 


440 


GO TO 






5O0 


BO TO 


=999 




S! 


■una 


18.8 


ii.KKSESS 


t 


- Fo.- 































600 


REM 

CLS : PRINT "FQRMATEAR 


., 








1010 


INPUT ; "NUM. del MICRQDR 


** 


loia 


LET num=CQDE M*I IF r>Lim 


50 




m<.4<? THEN GO TO 1010 




1020 


PRINT, "num. del Hicrsdri 


e 


1030 


CM**. 10 C.aract. 


C *° 








1040 


IF LEN nf.'lij THEN 50 TD 10 


30 






1050 


PRINT "NnrnBre dsl Cartu 














DEL FORMATEO ?": PRINT 




1070 


PRINT "Esta -ceranon " 




A GUe 


:"BOPP.A": FLASH 0;" tad 
tenga si ": FLASH 


.■■c 


APT'JCHO": FLASH 




I ©SO 


INPUT ]"FgrinstBsr isi-« 




■TECLfii ";oa 






IF =*""a" OS: c*="0" THE 




TO 


1100 




10=5 


C-0 70 TO 

PRINT : FLASH 1: PRINT 
"F0F.!1ATE&N00" 






FORMAT "ifiVSL ns;nl 






PRINT AT 10,6; "OF'ERACro 


1 TE 


KM IN 


FOR t=l TG 150: NEXT t! 


CLS 


,.' P 


3INT AT 10.=j "GIRO FORMA 


reo? 


1220 


INPUT TAB «i"(5.nl",FI 






IF F*="s" GP. F».= "3" t he 




1240 


GO 1 "™ 30 




1250 


REN 




2000 


CLS : PRINT "LI5TAR LIB 


ERI 








2010 


INPUT ;"NUM.del M'CRODP, 


VE 


2015 


LET ntlm2=eODE M»i IF nu 


z:-5 


OR 


num2".;4 = THEN GG TO 201 




2020 


PRINT "NUM.Sel Mtcroetrl 


B " 


i^-Jr' 


PRINT AT *,l l5 "E3PERE P 


R F 












2150 






2160 


PRINT TAB 11:"0TR0 CAPTUCHO 



5,1 






2170 


INPUT 


AB 4; " (s,n) ",C« 


21B0 


IF OS- 


s" OR C*="S" THEN G 


TO 






21=0 


GO TO 














t******************* 


2500 


CLS t 


-PINT "LISTAR LIERERI 


A POP IriF'PE 




2510 




"NUM. del MICRODRIVE 








2515 


LET nu 


d-COTjE MS: IF num>30 




rr-4? THEN GO TO 2510 


2520 


PRINT 










2530 


PRINT 


HT lO-Pl^'ESPERE PDF. F 


AVOP 








2550 


cat -.: 




25aO 


PRINT 


$T 10,=; " OTRQ CARTUC 


2570 


INPUT 


'AB 4i"(5.n)".CS 


25 BO 


IF C*= 


'6" OP. Ct="S" THEN G 


TG 


2500 






GO TG 


30 


2650 


REN 


********************* 


3000 


CLS : 


-RINT TAB B" "COPIAH F 


ICHEROB": PRINT : PRINT "DATGS F 


ICHERO FUENTE": PRINT 


3010 




'NUM. del MICRODRIVE i 




!";F* 






LET mi 


crof-VAL F* 




PRINT 


'Microdrive FUENTE 


3030 


INPUT 


:"NOMBF.E Ficnera FUEN 


TE 




(Mail 10 ear.>":f* 


3035 


IF -(1= 


"■ THEN GO TO 3030 


3040 


IF LEN 


f»>lfl THEN GO TO 30 


30 






3050 




'NQMBRE F ICHERO FUENT 








3055 


PRINT 


PRINT "DATOS FICHER 


RECEPTOR 1 ': 


PRINT 


3060 


iNPIJ- 








3063 


LET mi 


'Microdrive RECEPTOR 


3075 


INPUT 


"NOMBPE Ficherc RECE 


PTOR 






307 B 


if Ten 


"' THEN GO TO 3075 
r*>10 THEN GO TO 30 



75 








30B3 


PRINT 


"NO MERE FICHERO 


TOR = 










-RIII'I 


AT 12, 5i 


AEEGUPA LA 


PERAEIflN?" 










["CONFORMS is),- Manu 












"a" DR a 


="5" THEN 




3130 














3130 






"| FLA 


SH 1 


CQPIANDQ 


"i Flash Oi " 


3140 


MOVE 


m"t(Dicr Q 


;-f* TO "m"!m 










3150 


PRINT 


AT 13.5; 


COPIA TERM 


INADf 










PAUSE 






3200 


REM 


******** 


*********** 


3500 


CLS e 




STAR FICHERD 


EN F ANT ALL A" 




3510 




[■'NUM.de 


MICRODRIVE 












IF num2>2 OR n 




TQ 


3310 






3520 


















INPUT 




















«N GO TO 35 














" NOME RE 


ICHERO = "i* 


Loo 


PRINT 


, PRINT 


ESPERE FOR F 


ftWDR 










PRINT 


















3650 






* TO -2 




PRINT 




JNA TECLA" 


3670 


PAUSE 


Oi GO TO 


30 


















































IS 


it is, 






t>S?l 


"fill 























57O0 


RE " , 


******************* 


«ooo 


CLS : 


PINT "LISTAR FICHERO 




IMPRESORA" 




I NPUT 


"NUM. Sol MICRODRIVE 










IF nun 


>2 OR num2-;i THEN G 


TO 


















4030 


INPUT 


"NOMBRE Fichera 






+*M0 THEN 50 TO 40 








4030 


PRINT 


NOMBRE FICHERO = ";+ 


4100 


PRINT 


PRINT "ESFERE FOR F 








11 10 


PRINT 






41S0 


MOVE "ffl"*roim2i« TO -3 














4200 


REM ^ 


*********** ******** 


4500 




R1NT "BORRAR FICMERG 


4510 


INPUT 


"MUM. del MICRODRIVE 






















PRINT 








4530 


INPUT 


(Mac. 10 Car- act . > "in 








4540 


IF LEN 


n»MO THEN 00 TO 50 


4550 


PRINT 


Nombre del Fichero - 


"in* 




4360 


1-hlN] 


PRINT "ESTA SEGURO 


4570 


fKlNl' 111 


Eats aoeracian BOFRA 


s? 


ICHtKC 


"BORRAR (s^-Hsnu <T£ 


45-0 




'"s" THEN GO TO 30 


. 4600 




FLASH ll PRINT "BOR 


RANDO" 










4S10 


FLASH 0: PRINT I PRINT "OF'E 


4630 


REM SE 


j: SO TQ 30 



"CARGH PP:L"jP.Ar-lA 
. del MICRODRIVE 



10 THEN GO ■ 



'.:■-. FROGRANn 5iN- e 



SAVE f'to'-t 

■ ^ i; ■ 'HON&. FF.DGP.' "' 

i5?0 FRINT s FRIHT "NO SE FL'EDE 

inCEi-. COM ESTE 



" BuPRAr. -PCi'ihAM 



(1 O 2) ";n 


m 




6013 IF nun 


2 Oft numvl 


THEN BO 


TO 6010 






6020 PF.INT 


NUM. del Mi 




























6040 IF LEN 


n*>10 THEN 


GO TO 60 


30 






605O PRINT 












6060 PRINT 


PRINT "ESTA SE 


DEL BOP.RADO 






6070 PRINT 




ion BOPRA 


el PRtDEFfflhlfl '.s.-nl" 




6080 INPUT 


"BOPRAF (a 




CLA) "so* 








•"£" THEN 


TO 30 






RINT "BOR 


RONDO" 






6105 EftftSE 










RIW7 "OPE 


^""pfil^T 


tglta UNA 


ECLA" 








S200 REM ^ 


,„„„,„, 


********* 


MOO CLE : 


S RI«7 "HfiCE 




PRDGFAS" 






6510 PRINT 


********** 


********* 


6520 PRINT 


'Las COP I AS 


de PROGPA 








6530 PRINT 


















6540 PRINT 


FRIMERD hs 


que car 5 








6542 PF.INT 


ei Programs sn b! OF 


6543 PRINT 






6545 PRINT 


LOAD * ■ 










6E4B PRINT 






6550 PF.INT 










6552 PRINT 






6555 FF.1MT 






NO MB RE" 






6556 PRINT 






6S60 PRINT 


NOTA:Al =? 
















63B0 PAUSE 


" GG T0 70 






Humpty Dumpty 


De acuerdo... ies 
fallo nuestro! 


liuiiiii raincklo con i-l Iui-'K'i im i if ■ it_- priciica- lenta pero agobiante 
nomhro do uno de Ins memo nada que ver ran persecution, que se 
personajes do Alto's «n el lihl ° luKe «* pe%">sa a 

cJ Pais dt las Mjravi- HI jufNid-.r dcbe «>■ m«llda que pasa el 

lias, la Dtara mis Tamos;! nit-c mda la liierba, quo "««po. 

do Lewis Carrol. Mot- aparece en la palilalia ' ,as (ec " ,s «« control 

sob atoms quo es™ K 16 de distimos tones do soil tcdeiinibles, pera 

esie u'tulo porque. Fos verde. Los "huevos" se c(mserv a n oe un |ue- 

peesegUidores tlenen pueden movorse si tie- go a otto. 

un ligero patecido ton no iilj-una Mlida lihre Spectrum lb K 


on la Una 17. Para ampenr 
dn raraplels*. Promeh.. 



0>REM HUMPTY DUMPTY 

MoiSBB Vilalta Pons 84 
1 LET De-O: LET hl-Oi LET h2- 



0: LET k-li LET o 




s-0 1 L 


ET rl-li LET 


r2-0 


LET s-0: FOR 


k-0 TO 7i RE 




POKE USI 




, a: NEXT xi DATA BIN O0O1 


000, Bl 


N 00111100,8 


N 01 


11110, B 


M 0101 


1010, BIN Old 


1010 


BIN Oil 




IN 00111100, 


IN 00011000 




2 FDR h-0 


TO 7 


READ 3 


POKE 


USR "b"+X,«l 


NEXT 


Ml DATA 


0,0,0, 


BIN 00011000 


BIN 00111100 


BIN 01 


0I101O.BIN 




0,235 




3 FDR k=0 


TO 7 


READ a 




USR "c"+K,ai 


NEXT 


Ml DATA 




111100.BIN 




0,BIN 1001 1001 


,BIN 1001100 


,235 


BIN 110' 


00 1 1 , B 


IN 0110011O, 


UN 00111100 




4 FOR x=0 


TO 7 




POKE 


USR "d"+x,»s 


NEXT 


Ki DATA 


BIN OO 


111100, BIN 




O.BIN 10011001 


,8IN 1001100 


,23= 


255, BIN 




10, BIN 00111 


00 






5 FOR KH3 


TO 7 


STEP 2i 


POKE U 


SR ,, a"+H,BIN 


01010101: POKE USR 


"»"+K+l,BIN 


01010101 NEX 






TO 7 


READ a 


POKE 




NEXT 


XI DATA 




111110, BIN 


0110 


0.255,B 


N 1010 


1011, BIN O0OOOW1 


BIN 101 


1011,2 


55, BIN 00111 


00 






7 FOR M=C 


TO 7 


READ a 


POKE 




NEXT 


>:: DATA 


BIN 00 


111100.BIN 




O.BIN 1 


011101 


.BIN 0010101 


,BIN 


0100101 


,BIN 1 


0010010.BIN 


0000001,0 






): D 


M a»<2> 


Din b 


»(2>: LET a» 


I)- 1 ' 


Vl LET 






■"♦ 


: LET b' 




: LET vides=3t LE 




ous-10: SO SUB 3-5 






9 BORDER 


•; PAPER 8: CLS ; Fo 
5RINT AT * ,8, PAPER 






RPER 5) 


; PR IN 

IPP 








Kw *' 


TQ 21: PRINT 


AT x 


Oj PAPER 6;" 



1-INT <RND*29>+ls IF o(l,lll-l T 
HEN BO TO 12 

13 LET q(M>-l: LET w(m1-11i LE 
T a(l,m-li PRINT INK ?r PAPER 
OjAT l,llj"«": BEEP .01,2: BEEP 
.02,10: NEXT x 

17 LET h*co-FEEK 33600 I BRIGHT 
Ol PRINT AT 0,0) INK Oj PAPER 5 
i"PUNTUACION": PRINT INK O] PAP 
ER 5; "HIGH SCORE "jhscoIlOO 

IB PRINT AT 0,20; INK 0: PAPER 
3| "RESTAN" 

19 FOR :<-l TO videsi PRINT AT 
0,27*x; INK O; PAPER 5j"© " : BEE 
P .02,x: NEXT .:: PRINT AT 0,26*x 
( PAPER 5? IF vl3es=0 THEN 

GO TO 4S 

20 PAUSE 311 RESTORE 21: FOR v. 
-1 TO 24t READ a,aa: BEEP .01,11 

FOR f-1 TO aa*3i BEEP .04, a: NE 
XT fl NEXT x 

21 DATA 7, 1,9, . 6,7, .6,5, .6,4, . 
6, 5, .6, 7, 1.3, 2, .6, 4, .6, 5, 1.3, 4,. 
6,5, .6,7, 1.4 

22 DATA 7,1, 9, .6,7, .6,5. .6, 4,. 
6,5, .6,7, 1.4,2, 1,7, 1,4, .6,0,3 

23 LET p!=4i LET p2=13t FOR *- 
1 TO 15l PRINT PAPER 2; INK 7;A 
T 3,xi"®"!» BEEP .02,20: PRINT A 
T 3,X-1| PAPER 5s" "i NEXT XI PA 
USE 20: PRINT PAPER 5;AT 3,x-l; 
" ": PRINT AT 4,K-1( INK 7p PARE 
R 2;"©" i GO TQ 29 

24 LET be=.008i LET h«-INKEY»: 
50 5UB 52: IF punts>=2493 THEN 
50 TO 62 

25 IF h»=g*ll> THEN LET r2— 1 
t LET rl-0 

26 IF h*=o«(2) THEN LET r2-li 
LET rl-0 

27 IF h«»g«13) THEN LET rl=-l 



' i. ; ' ; I I ':■"' 



11 DIM o(21,31)i DIM q(ous): I 
1 w(di»)i FOR v. = l TO due 

12 LET 1-INT IRND*15>+5: LET 1 



i LET r2-0 

2B IF h»=g»C4) THEN 
LET r2-0 

29 GO SUB 42: GO TO t 
*r2>+30 

30 GO TQ 34 



31 GO 1 



34 LET [ 

' 0,11s II* 

5'NOT * 



45 



LET ( 



0: PAPER 3» 
=RINT AT pl+r 



paper : 



ET 



*<s+l)< BEEP . 
I,p2i INK 0(" 
BEEP be,20> LET pl-pl+rli LEI 
= D 2+r2: LET otpl-r I,p2-r2) -2: 
■ 2)=0: GO TO 24 

35 BORDER Ol PAPER Oi CLS 

36 PRINT INK 41 BRIGHT Ijfti 

t"« m m m m m. mm mm m 
w m t& m MM 



m m * 



39 PAUSE I 
IKEY*-"S" 

40 IF It 
N" THEN 



INKEY»="s" OR : 



THEN 

BEEP .01,20: GO TQ 
41 INK 7: PRINT AT 21,0|"« 
izqda."; PAUSE 01 LET gS ( 1 >■' 
;v*: PRINT AT 21,0s "antra dc 
i PAUSE 0: LET g» (21- INKEY»I 



LET g«C 



43 RETURN 

44 LET g»(] 
"I LET g*i3l = 

RETURN 



=INKEY»: PR: 
jo."i PAUSE 
RETURN 



45 


FOR N-30 TO 


STEP -.5: BEE 






INT AT pi,p2l 


PAPER O; " " 




46 


LET vide«=vid 




TO STEP -Is PRI 


T AT 3,>:; INK 


0; PAPER Sj"« ": 


BEEP .1,111 PRI 




HI! 0; PAPER 5 


AT 3,«j"* "i 


BEEP 


. 1, 15—:: i NEXT 


XI PRINT AT 3 


,0| PAPER 5;" "i PAUSE 40 




GO TO 19 




4B 






TO 50 




49 


POKE 33B0O,pu 


ta/100: PRINT 




0, 10f PAPER 7 


INK 0| "HISH 




D": FOR K-0 TO 30 STEP .ll 


BEEP 


.01, Ml NEXT y. 






PRINT AT 11,10! PAPER S| IN 




GAME OVER " 




51 






52 


LET Qcis-oua-. 


Oli LET k-k+1 




k>ou5 THEN LET k=l 


53 


LET oj=NDT oj 


LET ml=pl-ql 


k)i LET m2=p2-w<k> 




54 


IF ml'.O THEN 


LET hi — 1 


55 


IF ml>0 THEN 


LET hl-1 


56 


IF «a<0 THEN 


LET h2— 1 


57 


IF m2>0 THEN 


LET h2-l 


5S 




(l;>+h2><>2 QR 




+hl<4 OR qlk>+hl>20 OR wffcl 


+h2< 


OR w((t)+h2>30 THEN RETURN 


59 


PRINT AT q(k) 


hl,w(k)+h2; I 


NK 7 


PAPER OlO*(Q 


+1) I BEEP .01 




0: LET o(q(k> 




■ LEI 




2! PRINT AT q 




(k>: PAPER Ol 


"I LET q(k) = 




hi: LET w(l<>- 


<k)+h2: LET h 


l-Oi 


LET tl2=0 






IF dus<0 THEN 


LET GL1S=1 


61 


RETURN 




62 


PAUSE 30: FUR 


K-0 TO 6i FDR 


f-K 


TQ 20 STEP - 


: BEEP ,01, -f I 


NEX 


*: NEXT X 










2 ( " 


O.K.A.V ": ' 


TO 48 




BUN 


UBSION !1S 


»S*T<™ &e 


"""" 


:■ ■■,- I 






HlHpiDHI 
















• 


* 




Dugan Porter like 

it- Johan Sfli.nli.il] 
Bach |>ensaria iO<Jt> In 
uimtiirio. |)u^ -se Irani 



inii'ili. 1 ik-i'ir t[ui' pacru 




10 FLASH 0: BRIGHT 01 OVER It 
INVERSE Ot INK 7: PfiPER Os BOPDE 
I Oi CLS : FOR i=0 TO 12^1 PLOT 
,0: DF'AW 255-i,173l NEXT i: FOR 
i-128 TO 255: PLOT i.O: DRAW 0- 
,175: NEXT i 
BO FOR j-.5 TO .1 STEP -.1: RE 

[EP j,a: NEXT ii NEXT j: GO TO 2 



Codigo maquina: 



Hola, 


coma as prometimoa 


Primeramente lenemos que 


31 de la linea pase 3 1 


colum- 




amos para empezar a m- 


comprender exactamente Que 






























grdfico de la pantalla se desplace 






SCROL 




lu!.:ia la izqmerda de caracter en 




















TRUM se divide en 22 li'neas nu- 




















d" psias Imeas en 32 columnas 


pero solo de una linea. | 






pero creemos que pode- 


del al 31, entonces si Id que 


seguir que se moviera 






enter que aquellos que 








desean 


nlroclucirse en el CM. b 


desplace hacia la izquierda, ten- 


mero las caracteres de 


,ol..n 



musii 



Division de Memoria n "1 



ROM IMEMORIA SOLO LECTURAI 



SUSS 


.<_■ 




:■-■':"; 


,„„| SISK. 


L- 








28 2 




ajsK ? 




[Jr." 


S:."t|r 


".■s 


»„.»., .0. 


■^™i;;; 


j£nd" 


til 


1 














tunn 



n.u „ Pilou p.... I, j„, *«™ 

enif- """" -■■— 1'° "; I Ifcr 



nea 1, para seguidameme repetir SCROLL (ver progi 

la operaci6n, pero con las colurn- introducimq 

nas 30 29, 28 .... 3, 2, 1 y 0. A ejecutamos 

mayor niimerodefilas mayor niS- realiza el SCROI 

mero deveces tedn'amos que re- lentrlud y los 

columna, siguiendo esta idea po- 

s confeccionar un progra- Todor ~' 
en BASIC que nos realizara 



IJN-iiMNk: - 



nuestra programs 

A causa del diseno de la pan- 
talla, cada columna dentro de 
cada llnea. es decir, cada posi- 




;:™ 


7,1% 


caracter. esiS forma da porocho 
lineas de dibujo que equivalen 






r: eed 


t 


















4 



C3HE 



Division de Memoria n°l 









•Toum,™.. 


POKE Camanoo UtlfeMo 


para cola- 






£ B "™,",°™ 


"•-■"■ 


«s 


X = COSICION MEMORIA 


STiHE 




™» 


X^POSICION MEMORIA 


SErl 


•32 


X 


?SS Sl c ro „„„o nl « 



El listado del programa en I 
es el resultado de traducir el 
grama en BASIC al CM. La 
tructura de dichos progra 
son parecrdas y aprovechare 
este parecido para coment; 
prograi 



En pi 






16384= primera posicioi 
memoria de la pantalla I 
comprobar su ubicacion r 
POKE 16384.255). 



:192). 






Idd.h 



a de la pantal 



192 est 

las 192 

>c,31 = Cargar 
>c» con 31 est 

1). 

1. El contenido d 



gislro «d 
16385 (■ 



que hay que 
(corresponde 
lumnas-1 ). 

Explicacidn de la rutina en cd- 
digo mdquina: 

Id hl,16384 = Cargamos en el 
"mera posicirjn 



tenido del regislro t<de» q 
1 6384 pasa a ser 16385 

4. Decrements el com 
del registro «bc» que de 31 



I, 2, 3, 4y 5.Ahorat> 
s continiia er 



SCROLL de 


una de la 




-tes de 








urn. 0. 


Cuando el c 








«bcs - tendremos 






16385+31 






16384 


+ 31. 








ex de.hl = 


Esta ins 






tercambia 1 




de 








decir, que 










ceversa, cor 


ldque«h 


» = 


16384 



'6384 dides) 
que nabremos conseguido 



s la que corresponde ; 



jrdelregisl 



oqu> 



16384 + 31 + 1 + 1 = 1641 

memos 16385 + 31 = 1 
con lo que estamos igual i 

iniiif.ipio del programa despues 



ir al SCROLL de ti 





21 


00 


40 


Id hi, 163S4 


40003 


H4 








40004 


sr> 






Id e,l 


40005 


?3 






inc hi 


40006 


3F 


no 






4000S 


Ol 


TF 


00 


Id be, 31 


40011 


FT) 


BO 






40013 


in 






ex de,hl 


40014 


36 


00 




Id (hl),0 



40016 23 

40017 23 
4001S 3D 
40019 20 F3 
40021 C9 


inc hi 

jr n; ,40008 




iecuencia den 


L,n,er- D5 heKadecim 


ales 


"210O40545d23 , 


(y ENTER) 




"3ec0011f00edb 


Oeb" <y ENTER) 




"360023233d2Of 


3C9" <y ENTER) 




"=" (y ENTER) 







dec a = Decrementamos el va- 


«TECLEAR». En primer lugar car- 


seguro que mucho mas ra'pido 




gar el programa en BASIC des- 


que con el programa en BASIC. 


biamos designado como 192 




Si ahora haceis un pequeflo bu- 




pantaila de caracieres) v por fin 


cle en BASIC del mismo tipo: 


jr m. 40003 = Con esta ins- 


un GOTO 1 ... paciencia y vereis el 


1000 FOR n=0 TO 30 


irticcirjn mmprohamos que el 


SCROLL realizado en BASIC. 


1010 RANDOMIZE USR 


contenido del registrq «a» no sea 


Para poderobservar la diferen- 


40000 


mientras este registro no sea 


cia con el CM. seguidamente 


1020 NEXT n 


el programs se volvera a repetir 


cargar el nCARGADQRn (progra- 


EjecutSndolo con un COMAN- 






DO DIRECTO - LIST : GOTO 


40003 si observamos el listado 


flm-.ir miftStiT) CM yque en el an- 


1000 si ejecutais este programa 


del CM. veremos que esta posi- 


terior niimero de ZX os comenta- 


vHiicijs I'oiiio lorta la [.>anialla ss 


ci6n de memoria se corresponds 




desplaza hacia la izquierda hasia 


conla orden itld bc,31» ahora 


realizar un CLEAR a la posicion 




bien en el momento que «a» sea 




Una pequerta aclaracirjn, las 








se y proseguirS en la siguiente 


1 CLEAR XXXXXX (XXXXXX = 


programa en C.M.. son los valo- 




40000-1) 




remos nueslro propdsito a saber 


2 LOAD«CARGADOR» 


que conforme la rutina se va aje- 




3 RUN 


cjiain.lo ilicnub. L-iilores se modi- 


dad sera" repetido 1 92 veces con 


4 INTRODUCE SECUENCIA 






DENUM. HEXADECIMALES 




SCROLL de loda la pantalla. 


5LIST (pa rallenarla pantalla) 




ret = Devuelve el control al BA- 


6 RANDOMIZE USR 40000 




SIC. 


Enrnnr.es vereis como el con- 




Ahora si quereis comprobar 


tenido de la pantalla se desplaza 




lodo lo que os hemos indicado a 


Ull cruller ■ la Helta* para 


OHUVNOOCORNUDELL- 



CuicL© su Sp©ctrum 




Proteja su ordenador y mante~ngalo 
como nuevo con esta practica 
lunda de teclado transparente 



Servlclo 
especial 
para nuestros 
lee tores 
y amigos 



950p!» i 



' 


CUPON DE PEDIDO 










,„ m .™ 


CW.^tkcMMC. 
















*,.,.„ I*.!..,..,. 












gpSS"* 




.. 


[ j 




Yganaron 

el Invesdisk 




La respuesta al ZXGRAMA do Julio era sencllla, cotno 
demostro el alto ntimero de acertantes: EPSILON. 
Aunque muchos ae emperiaron en L SENO PI. Otro 
tanto ocurrld en el CRICIANAGRAMA de Agosto. La 
adivlnanza era «Barqulta de buen parecer que nlngun 
carpintero sabe hacei ■■■■■■■. pero la soluciin no era la 
lengua, el Spectrum, o el huevo, slno la NUEZ. 



GANADOR DE JULIO 




GANADOR DE AGOSTO 


Emilio 
Palacios 

Pascual 

Belchite, 13,8."dcha. 

Logroho (La Rioja) 


Juan 

Saracho 

Martin 

Dr. Felix Landin, 8, 
5.° dcha. 

Bilbao (Vizcaya) 



Ya rueda el baton 




No te quedes 
f uera de juego 

uf.*^*!-. La liga ha empezado. Es el momento de preparar el Spectrum 

y rclicnar sus bnlclos dircctamcnte con el order) ad or. Para ello 
disponemos de dos opciones: utilizar un programa comercial 
(ver ZX niimero 22) o cargar c) siguiente programa remitido 
por Fernando Saenz. Aninio y— JBuena suerte! 







a 



problems nparcce cuan 
dc boleros cs superior a I 
minada (digamns del o 



m urifis, tluses., «|uis y/o variuim 
luiwrn r.-.r.il dc doses y equis). Kn 

iiriL... -ljIi. Lili.i^- mm ;k-^.iJos pira un 



■nm cuenis (posecr un 

fin llegst b! d/i en que 
I resuludos dc h qui nit 



10 


REM "QUIN 2.0" 








20 


LET P 


=li DIM Q<Z> : LET 


□ CI 


)-C0 


LET Q(2)=l: LET W=0: 


LET X 


-Oi LET V=0: LET 1=0: LET P- 


t L 


ET J*="1X2 












DIM S*14,27> : FOR N=l 


TD 13 


I FORfl-1 TO Id LET 


5*<M,2*N 




"i NEXT Ml 


NEXT N 








40 


IF R» 


11 1 " THEN 


GO TO 


600 


50 


DflTfi 


26,94,70 








100 


FOR A 


1 TO 3i 


F B»ll 


A 


< >J 


*<A) 




GO TO 530 






105 


LET D*tl>=J»<« 


! LET 


3* 


1, 1 


>=STR* ID* 


t)""l")l 


LET S* 


(2 




STR« 


<D*<1 


="X"): LET S*C3 




■ST 


R* <D*<i)= 


2">i LET 


5*14,1 


-STR* 


(D* 


1)="X 


□R D* 1 1 


- " 2 " ) 






110 


FDR B 


1 TD 3l 


F B*<2 


B 


<>J 


• (B) 


THEN 


GO TD 520 






IIS 


LET D 


(2>=J*CB 


I LET 


3* 


1,3 


)=STR* !D» 


2>="1" > I 


LET S* 


2 


3>- 


STR* 


!D*C2 


■"X">: LET S*C3 


3 


-ST 


R* <D*<2>= 


2" > : LET 


S*<4,3 


-STR* 


CD* 


2)-"X 


OR DSC 2 


■ "2") 






120 


FOR C 


1 TO 3i 


F BS<3 


C 


<>J 


• CO 


THEN 


GO TO 51 








125 


LET D*<3>-J*(C 


: LET S* 


1,5 


)«STR» CDS 


3>="1") : 


LET 5* (2 


5>» 


STR* 


(D* '.:l 


="X">i LET S*<3 


5 


-ST 


R* <D«C3>= 


2")i LET 


S*<4,5 


=STR* 


(D*(3>»"X 


□R D*<3 


= "2") 






130 


FOR D 


1 TO 3l 


F B*<4 


D 


<>J 


*CD! 


THEN 


GO TO 500 






135 


LET D*(4)=J«(D 


: LET 5* (1,7 


>-STR* (D* 


4>«"1») j 


LET S* 






8TR» 


<D*(4 


=" X" ) : LET S«(3 






R» CD»C4>= 


2™ ) ! LET 


8* (4,7 


=STR* 


CM 


4)="X 


OR D*<4 










FOR E 


1 TD 3: 


F B*<5 


E 


<>J 


• IE) 


THEN 


GO TD 490 






145 


LET DS<5)=J*CE 


i LET 5* 


1,9 


)=STR* IDS 


5>="l")i 


LET S* 


2 


91 = 



STR* (D*<SJ«"X")| LET S*<3,9) 


^ST 


R* (D*!Sl="2")i LET S*(4,9)-S 


m*. 


(D315>="X" OR D*(5)= M 2") 




150 FDR F»l TO 3i IF B*(6,F> 


>j 


*<F> THEN GO TD 480 




155 LET D*<6!-J*!F)t LET S* < 




1)=STR* ID*I6)= ,, 1") i LET S*(2 




)=STR* (D*<6)-"X l, )i LET S*!3, 




=STR* (D*<6)="2">; LET S*C4,1 




STR* <D*<6> = , 'X" OR D*<6)="2") 




160 FOR G=l TO 3i IF B»(7,G> 


, j 


*<G> THEN GO TO 470 




165 LET D*(7)=J*<G)i LET S* C 




3>-STR» (D*(7)="l")i LET 5*C2 


13 


>=STR* <0*<7)**X">| LET B*C3, 


3) 


=STR* (D»(7)-"2 n )l LET S*<4,1 




STR* <D*(7)="X" DR D*<7)="2 - ') 




170 FOR H=l TO 3: IF B*C8,H) 


:j 


*(H) THEN GO TO 460 




175 LET D*(8)=J*<H>! LET S« C 




5>=STR* <D*(a>="l")! LET S*C2 


15 


)=STR* (D«(8)="X">: LETS*C3, 


5) 


=STR* ED«<8>-"2">: LETSSC4.1 




STR* (D*(B)="X" OR DS(B)="2") 




ISO FOR 1=1 TO 3[ IF B*t9,I) 


>J 


* ! 1 1 THEN GO TO 450 




185 LET D*(9>=JSU> I LET S* ( 




7)^STR* (D*(9)= ,, l") I LET S»<2 


17 


>=STR* <D*<9)«"X") : LET St<3, 




=STR* (D*<9)-"2"1: LETS*(4,1 




STR* (D»C9)="X" OR D*(9)="2"> 




190 FDR J=l TO 3: IF B*C10,J 




J*<J) THEN GO TD 440 




195 LET D*C10)-J*(J) 


LET S* 




19>=5TR* (D*(10)="l") 


LET S* 


2> 


19)=STR* tD*<10)= , 'X n ) 


LET 5* 


'.. 


19)=STR* ID*(10)="2") 


LET S* 


4, 


19)=STR* CD*(10)="X" OR D*(10 


= " 


200 FOR K=l TO 3: IF B*UI,K 


<> 


J*(K) THEN 50 TO 430 




205 LET D*(11)=J*<K> : LET S* 


1, 


21) "STR* ID*(ll)= , 'l") i LETS* 


2, 



En primer lugsr 
nemos impresora, ) 
Admalc DP-BO a 



21 


-STR* 


to* 


iij*' 


X"> 


LET 


S*(3, 


21 


^STR* 


(D»(ll)»' 


2") 


LET 


S»(4, 


21 
2" 
2 


=STR* 


<D* 


11!=' 


X" OR D* 


11)=" 


FDR 


L-l 


TO 3: 


IF 


B*(12,L><> 


J* 


L) THEN 50 TO 


420 






2 


5 LET 


D»< 


2)=J* 


<L) 


LET 


S»(l, 


23 


=STR* 


(D* 


12)=' 




LET 


S*(2, 


23>=STR* 


(D* 


12)=' 


X") 


LET 


S*<3, 


23 


-STR* 


CD* 


12) = ' 


2") 


LET 


S»<4, 


23 

2" 


=STR« 


<D* 


12)=' 


X" OR D* 


12)=" 


FOR 


M-l 


TO 3: 


IF 


B*<13,M><> 


J« 


tl) THEN GO TO 


410 






225 LET 


D*( 


3)=J* 


CM) 


LET 


S*(l, 


25 


=STR* 


(D» 


13)=" 




LET 


5*12, 


25 


=STR« 






X") 


LET 


S* (3, 


25 


=STR* 


(D* 


13) «" 


2") 


LET 


SI 14, 


25 
2" 
2. 


=STR* 


<D* 


I3I-" 


X" OR D* 


13)-" 


FOR 


N-l 


TO 3i 


IF 


B*I14,N>0 


J* 


N) THEN 60 TO 


100 








5 LET 


D»< 


4)=J< 


CN> 


LET 


S*U, 


27 


=STR* 


ID* 


14)=" 


1") 


LET 


S*(2, 


27 


=STRS 


<D« 


14) = " 




LET 


B*<3, 


27 


=STRl 


<D* 


14) = " 


2") 


LET 


S*«4, 


27 


=STR* 


CD* 


1 4 > = " 


X" QR D* 


14)-" 


300 IF R(l> 


THEN 


LEI 


W=VAL S*( 




IF <W>VAL C*(l 






C*(2 




THEN 


GO TO 40C 










IF F 




THEN 


LET 


X=VAL S*( 


2) 


IF <X>VAL C*<7 




X<VAL 


C*<4 




THEN 


GO 1 


4O0 








320 IF R(3> 


THEN 


LEI 


Y=VAL S*< 


3) 


IF CY>VAL C*<5 




YXVAL 


C*(6 




THEN 


GO TO 400 








330 IF F 


(4) 




LET 


Z=VAL S»( 




IF ( 


>VAL C»<7 




Z<VAL 


C*(B 




THEN 


BO TO 400 








340 IF 


CDL- 


CO) *RND>= 


CO THEN 


TO 400 












380 LET 


A*IP)=DS 









390 


PRINT AT 10,2 


jP: LET P^P+1 


395 


IF P>DIM THEN 


GO SUB 9400: 


LET 


Q(l)-P-1: LET 


P=l 


400 


NEXT N 




410 


NEXT M 




420 


NEXT L 




430 


NEXT K 




440 


NEXT J 




450 


NEXT I 




460 


NEXT H 




470 


NEXT 5 




480 


NEXT F 




490 


NEXT E 




500 


NEXT D 




510 


NEXT C 




520 


NEXT B 




530 


NEXT A 




540 


BO TO 700 




600 


FOR E-l TO CO 




610 


FOR N=l TO 14 




620 


LET A=!B*(N, 1 


="1")*A<N, 1)* 


RND 






630 


LET B=!B*(N,2 


»"X">*AUJ,2>* 


RND 






640 


LET C-<B*(N,3 


»"2">*A(N,3>* 


RND 






650 


LET D=<A+B+ABS <A- 


T D= 


D+C+ABS (D-C) 


/2 


660 


LET F=(A=D)+2 


(B=D>+3*tC=D! 


665 


LET D*(N)=JS(F) : FOR M=l TO 


3i LET 5»<M,2*N~1 


=STR« (M=F) : 


NEXT 


M: LET S*(M,2 


N-1>=STR* (F> 


670 


NEXT N 




672 


IF R(l) THEN 


LET W=VAL S*< 




F (W>VAL C*(l 


)+(W<VAL C«<2 


) ) THEN GO TO 610 




674 


IF Rt2) THEN 


LET X=VAL S*[ 


2)1 


F (X>VAL C*(Z 


)+<X<VAL C*(4 


) ) THEN GO TD 610 




676 


IF R(3) THEN 


LET ¥=VAL S* ! 


3) [ IF <Y>VOL C*(5 


)*<Y<VAL C$<6 


) ) THEN GO TO 610 





. cm Ki^irliifit ^|iil- |.i-Lii-n, r»s 



! 1X2. niimcio mixirn 
dose^, equis y v: 



i aMif dr >. Lis difen 



ENTER, que desphu 



678 IP R(4> THEN LET Z=VAL 3* ! 
4): IF <Z>VAL C*<7) >+<Z<VfiL C*<8 
) ) THEN GO TO 610 

680 LET A*(P>=D«: PRINT AT 10,2 
1;P: LET P=P+1 : IF P>D1M THEN G 
SUB 9400: LET F=l 

690 NEXT E 

700 CLE I IF p*="2" THEN EO TO 

810 

710 FOR J-l TO PI 

720 FOR P=l TO (DIM-QU! )*(Q<1> 
>DIM!+QU) STEP B 

730 GO SUB 9300 

740 FOR C=0 TO 7 

750 FOR N=l TO 14 

760 PRINT OVER 1 [ ftT N+1,4*C-MA 
*(P+C,N>="X">+2*{fl*lP+C,N)="2") [ 

770 NEXT Nj IF P+C-Q ( 1 ) THEN 6 

TO 790 

775 NEXT C: GO SUB 9100 
790 NEXT Pi GO SUB 9200i NEXT J 
790 PRINT ftT 21, 13; "-FIN-"! GO 
SUB 90001 GO TO 5000 
800 LPR1NT CHR» 27i"3"jCHR» 33| 

1 FOR N=l TO CI I LPRINT : NEXT N 
I LPRINT CHR* 27;' , 3")CHR« 34j i F 
OR N=l TO 02: LPRINT i NEXT N: R 
ETURN 

810 CLS l LET D=0! PRINT "PREPA 
RE LO IMPRESORfl EN EL MDDO";TfiB 
12| "TRACCION": GO SUB 9150: CLS 
! LET 01 =9 j LET 02-9 

820 INPUT "Clave titular ? (Max 
. 16 c«r.)",N»i IF LEN n*>16 THE 
N GO TO 820 

B30 PRINT "IntrcdLizca el boleto 

de orueba": GO SUB 9150i GO SUB 

BOO 

940 CLS : PRINT ftT 10, 7( INVERS 
E ls"CftRGft CORRECTS?"! GO SUB 90 
OOi IF I»="N" THEN GO TO 830 

850 LET N0=0: LPRINT CHR* 27; CH 



R* 5fi;"0-0 ";N*: FOR 1-1=1 TO 
24i FOR N=l TO 14: LPRINT ("X" A 
NO M/3=INT IM/J))t|" " AND M/3<> 
INT (M/3));: LPRINT CHR« 15) " " 
| I LPRINT CHR* IB;: NEXT Ni LET 
NO=NOT NO: LPRINT CHR* 27| "3" jCH 
R* (31-NO): NEXT M 

855 FOR N=l TO 5: LPRINT : NEXT 

Ni LPRINT CHR* 27;CHR* 37; 

860 PRINT ftT 10,7; INVERSE 1 ; " I 
MF'RESION CORRECTA?": GO SL2 9000 
: CLS [ IF IS«"S M THEN GO TO 10 
00 

B70 PRINT AT 0, 0; "DESVIACION VE 
RTICAL(+ "> : ";D: GO SUB 9000: 
IF CODE IS=13 THEN GO TO 9O0 

890 LET D=D+li IF D>9 THEN LET 



S90 PRINT I 



O, Z7;D; ' 



GO TO 



900 LET Cl=9-D: LET C2=9+D 

910 CLS t GO TO 830 
1000 FOR J-l TO PI 

1005 FOR P-l TO (DIM-GIU) >*(B(1> 
>DIM)+QU> STEP B 
1010 LET Q=P+DIH*IJ-1>: PRINT AT 

10,0; INVERSE 1;"PREPARE EL BOL 
ETO. "i GO SUB 9150 
1020 GO SUB 800 

1030 PRINT AT 10,0i"CARGft CORREC 
TA ? "i GO SUB 9000: IF I*-"N" 
THEN GO TO 1010 

1040 CLS : LPRINT CHR* 27t"3"»CH 
R* 34;Q; •'-'•; Q+7 ; - ";N*;CHRS 27 

;CHR* 56 

1050 FOR C=0 TO 7: FOR M=l TO 3 
1060 IF P+OQQ) THEN GO TO 114 
O 

1070 FOR N=14 TO 1 STEP -1 
1090 IF AI(P+C,N)-J«(M> THEN LP 
RINT "X"j 

1090 IF A*tP+C,N)OJ*<M) THEN L 
PRINT " "; 






dcscadas, Porejempln sidamos un GOpor 100 

parece que 1<I til aigoiente ipuudo ^<>n lw po-ibi- al I, un 30 pnr 10(1 a la X y un 10 por 

que cuatro sqn lidadcs; si sc .Icsca jLccdti a ulla* se 100 al 2 p un dcicrmirado ninido. dc 



Ic *, 3, 2, 1 y niogiiti El ordenodor 






1100 LPRINT CHR* 


15)" "jCHR* IB 


i i NEXT N 




1110 IF M=2 THEN 


LPRINT CHR* 15 


i "OOOO" ( TO 4-LEI 


5TR* (Q+C))+ST 


R* IQ+C) ;CHR» 18 




1120 LET NCNNOT NO! LPRINT CHR« 


27|"3"|CHR» 134-1 




1130 NEXT M: NEX 


C 


1140 FOR N=l TO 5: LPRINT : NEXT 


Nt LPRINT CHR» 27;CHR* 57 


1150 NEXT P: GO SUB 9200i NEXT J 


1160 PRINT AT 10 


14; "FIN": PAUSE 


0: GO TO 5000 




1500 CLS i PRINT 


" ESCRUTINIO D 


E QUINIELA5 " 




1310 IP ES THEN 


IF Pl-1 THEN P 


RINT -HAT 0,0|"De»ea escrutar 1 


oi datos en munoria ?"i GO 8 


UB 90001 INPUT " 


i IF IM"S" THE 


N GO TO 1330 




1320 PRINT *1| AT 


0, 0j"Pu1m una 


tccla para datas 


grsbados en cas 






1323 PRINT *1jAT 


1,23 J "0-M«nu"l 


GO SUB 9150i IF 


•■="0" THEN GO 



TO 3000 








1525 


1 (-'I 


=■1-1 * GO 


3UB 92201 


LET 


ES-1 


GO 


TO 1550 






1530 


GO SUB 5060: 


IF LEN Z» 


1 TH 


EN GO TC 


1330 






1540 


LET 


:«!N>»Z»I 


RETURN 




1530 


FH.R 


*"l TO 1' 


GO SUB 


530 1 


NEX 


N 








1560 


GO SUB 90501 


IF It-»S" 


THEN 


INPUT ' 




'jNi GO SUB 15 






1560 






1370 


CLS 


I LET Dll- 


■0(1! I LET C-0 


i LET P-C 


] LET X-C 


LET Y=0 


LET 


Z-0 


LEI 


Xl-Oi LET Vl-0[ LET Zl 


-Oi PR IN - 


INVERSE 


IpTAB 4; 




TAB 




3" [TAB 24 


"11": TAB 


31 


1580 


FOR 


■J-0 TO 255 STEP BO 


FOR 


M-0 


TO 7 


STEP 2 1 


s LOT N+M,i 


■ DR 


AW 


1731 


NEXT Ml 


^lEXT N 




1590 


FOR 


1-S TO 230 STEP SO 


FOR 


N-M 


TO M+72 STEP 


24s PLOT N,0: 


DRAW 


0, 175t NEXT l\ 


NEXT M 






FOR 


■1=1 TO 0< 


.>! LET C- 


C+li 


IF ODII> 


THEN GC 


SUS 9200 


LET 


C=l 











vg$2 



ss$- 



I%g2t 




1610 


FDR M= 


1 TO 14i LET P 


=P+<A 


B( 


C,M> 


D» ( Ml ) 


NEXT 








1620 


IF P>1 


THEN 


LET X = 


<+(P» 




)i LET Y=Y + 


P=!3) 


LET Z = 


+ (p= 




I : PRINT OVER 1 ; AT X*<P= 


2)+Y 




P=13 


+Z*(P= 


4) ,4-LEN 5TR4 


N+10 




P-12 


+3*<X1 


itP-12 


+Y1*(P= 






<P=14) ) ;N 










1630 


IF X>19 THEN 


LET XI 


=X1 + 1 




LET 














IF Y>1 


? THEN 


LET Yl 


=Y1 + 1 




LET Y=0 










1630 


IF Z>I 


? THEN 


LET Zl 


■Zl + 1 




LET 


-0 










1660 


LET P» 
T N 


Ot PR J 


T *1|AT 


1.14 


N 


1670 


PRINT 


•ljAT 




M "i 


nfl 


SUB 




F i»* 


B" THEN 


GO 


■n 


1*70 










1680 


GO TO 


SOOO 








4790 


LET ES 


-0: DI 


Qt2) 






5000 


F.ANDOI" 


IZE i 


JIM B*(l 


1,3)1 


i) 


IM A 


11,3) : 


DIM R 


4)i LET 


J*=" 


X 


2"i LET D«= 






"i POK 


E 23609,20 











5010 BORDER 1 



Escri 



Hi "QUINIELAS";AT 
□ llo"" -TAB 9| "2 
) SUB 90001 LET N= 



VAL ; 

5030 PRINT ' ' ' "Imprescira ?"jl GO 

SUB 9000: IF i*»"1*" THEN LET p 
•="0"i BO TO 5050 

5040 PRINT CHR* 8i "Admats DP BO 
?'■: GO SUB 9000i LET Pt-"l"i IF 
I*="S 11 THEN LET P*="2": RANDOM I 
ZE USR 64973: POKE 64517, li POKE 

64520,19: POKE 64521,1: POKE 64 

5050 IF N=2 THEN GO TO 1500 
5055 LET ES=1: GO TO 5100 
5060 PRINT AT N+4, 0; "Parti do ' 
i INPUT z*: IF z«="" OR LEN ;»>3 

THEN GO TO 5060 
5065 LET B*(N)=- ,,, ! LET J-0 
5070 FOR M=l TO LEN ZS: IF Z*1M) 
="1" THEN LET B*(N,l)-"l"l LET 



5075 IF Z»CI 



OR Z*(l 




LET B*<N,2> = 



X": LET J-M 
5080 IF Z*(rl!="2" THEN LET Bt(N 
,3)="2"i LET J-M 

3083 NEXT H: IF NOT J THEN BO T 
B060 
5090 PRINT AT N+4,12i"i "(B*(N>i 

RETURN 
5100 CLS ! PRINT TAB 10;"1 1X2" 
: FOR N=l TO 14: GQ SUB 3060: NE 



IF N<3 OR N>14 THEN GO TO 5120 
5130 GO SUB 5060i GD TO 3110 
5150 CLS : DIM C«(8,2)t PRINT TA 
B 7) "2 RESTRICCI0NE5"" " Elimi 

5160 FDR N"l TO 3: PRINT AT 2+4* 
N,ls INVERSE liJ»(N)t NEXT N: PR 
INT AT 18,0; "Var." 

5170 FDR N=l TO 4: PRINT AT 1+4* 
N,5l"M*S de t"i"TAB 5; "Menos 
de : ": NEXT N 
3180 LET J-lt LET K»J 
5190 BEEP .5, 10 

5200 PRINT AT 5+2*J, 16jC»(i3» | "_" 
;: GO SUB 9000: PRINT CHRS B; " " 
5210 LET I=CDDE I»l IF 1=13 THEN 
LET J=J+li LET K=li IF J>B THE 
N LET J=l 

5215 IF I*=" " THEN GO TD 5250 
5220 IF 1=12 THEN LET CStJ>=" 
": LET K=l: GO TD 5200 
5230 IF 1«<"0 M DR I*>"9" Oft K>2 
THEN GO TO 5200 
5240 LET C+M,K)-I*i LET K-K+li 
GO TO 5200 
5250 LET IS=" " : FDR N=l TO 3 S 



TEP 2 

5260 IF tC* £N) = 1* AND C*(N+l)OI 

»> OR CC#(N)OI* AND C*(N+1)=I») 

THEN GO TO 5190 
5270 IF CSINIOI* THEN LET RCN/ 
2+.5>=l 
5280 NEXT N 
5290 GO SUB 9030: IF IS="S" THEN 

GD TO 5200 
5295 GO SUB 9090 

5300 CLS : LET R»=""t PRINT TAB 
7 j "3 PRDBABI LI DADES " 
5310 PRINT "l;"De5ea dar probabi 
lidedes?": GD SUB 9000: IF I*-"N 
11 THEN GO TO 5450 
3320 LET R*="l"l GO TO 5400 



1340 ) 



) LET J=C 
B*U 



, M!=J*(M 



5350 NEXT M: IF J'-'2 THEN FOR M= 
1 TO 3: LET A(N,M)=li RETURN 
5360 FDR M=l TO 3: IF B*(N,M>=JS 
<M) THEN INPUT ("Fartido "(N'-P 



"; J* 



Hifl 



> : PRINT AT N+3, l2«-5*l"lj A (N, N) 
S370 NEXT M: RETURN 
5400 FOR N=l TO 3: PRINT AT 2,13 
+ 5*N; INVERSE 1;JKN>: NEXT N 
5410 FDR N=l TO 14: PRINT AT N+3 
,Oi"Partido "}N;TAB 12;B*(N>: GO 

SUB 5330: NEXT N 
5420 GO SUB 9050i IF I*="N" THEN 

GO SUB 9090: GO TO 5450 
5430 INPUT "Fartido numcro " 3 N: 
GO SUB 5330: GO TO 5420 
5450 CLS : PRINT TAB 4; "4 ELIHI 
NACION ALEATORIA" 
5455 LET CPL=1: LET S=0: FDR N=l 

TO 14: LET JmJi FOR M=l TO 3: L 



s# 



s>- 



rf$ 



:■-> 




Fernando Sacn/. Pi: TCI 






ET 3-"J+(B*(N»MK>" ">: NEXT Hi L 




cla"! GO SUB 9000: PRINT AT 21,7 


ET S=S+J-(7/N)/3: LET COL=COL*J: 




j" ■': RETURN 


NEXT N 




9160 FOR 0=!0 TO 50: BEEP .02,0: 


5460 LET C0=COL: PRINT •*■*•■' Nu 




BEEP .01,30-0: IF INKEY*""" THE 


tnero de columnss estiroadas: "' ' " 




N NEXT 0: GD TO 9160 


" ( COL 




9170 RETURN 


5470 PRINT fiT 14, 1 ; "Numero de co 




9200 IF F1=Q(2) THEN RETURN 


lumnas requeridas: " ' ' TAB 31;AT 1 




9210 GO SUB 9160 


6,2:CG 




9220 INPUT "": PRINT "ljAT 0,5;" 


54B0 GO SU& 90501 IF I»= ,, N" THEN 




CAR&UE EL BLOOUE "(PI I LOAD "" D 


BO TO 5500 




ATA A*<): LOAD '■" DATA Q(): LET 


5490 INPUT "Nuraern de columnar? 




Pl-Pl+Ii CLS : RETURN 


"iCOi GO TO 5470 




9300 CLS : FOR K-l TO B: PRINT " 


5500 60 SUB 9O90 




1x2 "s: NEXT Ki FOR y=175 TO 47 


5510 LET DIM" 1500! IF CQOISOO T 




STEP -B: FDR :'.=0 TO 248 STEP 32: 


HEN LET DIM=CO 




PLOT K,y: DRAW 24,0: NEXT x: NE 


5520 DIM A*<1MM, 14) 




XT y: FOR w=0 TO 255 STEP B: PLO 


5600 CLS : PRINT TAB 10;"DESARR0 




T x,I75i DRAW 0,-7i PLOT M, 159: 


LL0";AT 10,0; "Numero de columnas 




DRAW 0,-112: NEXT X 

9310 RESTORE : FOR K-l TO 3: REA 


5610 GO TO 10 




D y: FOR a=0 TO 24B STEP 32i PLO 


9000 PAUSE Ol LET I*=INKEYS! BEE 




T x,y: DRAW 24,0: NEXT xs NEXT K 


P . l,RND*15+20i IF IS>"#" AND I« 




9320 RETURN 


<""■" THEN LET I*=CHRS <CODE IS- 




9400 PRINT *I;AT 0,0) "Pulse una 






tec la para salvar el bloque de 


9010 RETURN 




datos: "(PI 


9050 PRINT "ls"Alguna correccion 




9410 GO SUB 90O0 


?"l GO SUB 9000: INPUT ""( RETU 




9420 SAVE STRS PI DATA A* <) : 5AV 
E STR* F1 + '"" DATA Ql) 


9090 PRINT "1;AT 0,0;"Desea copi 




9430 INPUT '■ ,l : PRINT -1 5 "Veri -f ic 


a?": GD SUB 9000: INPUT ""i IF I 




ar 7": SO SUB 9000: IF I»-"N" TH 


*-"N" THEN RETURN 




EN RETURN 


9100 IF P»="0" THEN GO SUB 9150 




9440 PRINT AT 10 f 0;"En caso de e 


! RETURN 




rror escribir: GO TO 9400"! 


9110 IF PS="1" THEN COPY : RETU 




INPUT "•': VERIFY "" DATA AS C ) : 


RN 




VERIFY "" DATA Q<> 


9120 RANDOMIZE USR 65044: RETURN 




9450 RETURN 

9900 PRINT PEEK 23641+256*PEEK 2 


91S0 PRINT AT 21,7; "Pulse una te 




3642-PEEK 23635-256*PEEK 23636 




COMPUTING 



KY4SK 







£ 




YMUCt 


.-. / *-*» 




"~ 


SPECTRUM 




L^-^J 


r MAS Dt «| 
150.000 PTAS. ■■ 
EN PREMIOS. |f^ 
BASES EN EL 1"^ 
L INTERIOR J- ^ 


I.ABER: 

TRES Dl> 

GRA 

WII 

R£ 

DEF 

DIBUJOS 

ATAQUE 

AGENDA 1 

PL 
LA SEi 


:nto en 
[ensiones 

FICOS 
IARD 

;loj 

ENSA 

ANIMADOS 

; ESTELAR 

'ELEFONiCA 

>K1 

ZLE 

(PIENTE 




^ pragran 





■ ll.i .1.: !.■ TI.IL]!.! 1 LT.ls. -...^ . ..; pTL'-LII'.J.I 




1 ^^STj L,fcT|'.(n.|l"-^ l.-: ijllllln [) 1 L'.'llllu 




ce y la mrncnic dc carfta pn^i a mvtv, 
de Rl v una poraiin variable dc KV 1 


. m, ,™,b. 


M.- S un 1.1 pusicKjn del cje jxiltnnomrf- 
rrieti. Uundo cl mtcgrado 555 sr con- 


ntcgiado 555 ts 


masa ™n lo que Dl no conduce v C.l 

«! ■fcsrnrj.il ii r ravel fir l.U R2 v la'mra 


nsad'ores v das 


luii.l.fc RI.R.U k\ 1 cM-nn.t.irin: In 




frccuencia d= »]idi (paiilla 3) « fijfc 




, :l f NV:ir;, INT WAIT 




Ijn^nr^ 



:^j^^^^ 



| vi m. i Ik, I inii.i f-|.'mplii';, 'ipfb-,1 Duel v 

'|NT; cl lliiffliulnr -It- |iifj,.i-i sc nrelera 
ii cnkT.ltcc si'^iin ki I.i-t del rui'liu; Ma- 
nic Miner ™n WAIT, etc. En ciml- 
quicr caso. execpio <=n BASIC v M 



ft (ipernrln por largos fiorrinlos Jl- 

BkmIu durante d cstado dc WAIT. 
<pado ds 1:80 la patilla WAIT es acli- 




IMWpara 
prhmcipiantes 



•I 

mil— -dd 



e (9 un tenia sobre el que sc do. La dificuhad varfa gcgita el 

lo hagamoq en un future La "pue-aa en es._ena"*era: vev 

mo — . Nueslro propositi) — Ln miiad superior de la pan- lizi 

en vcr unos cuantns princi- talla cs fijj y lienc el marcador de pre 

ikujii^n--; iiBivtr 1111 ohjctri .[,■ v-iini.L<!"ivs ,iii, f'nrm.m el eru- 

por la paninlla, detect™ clioques pi. en cada tiuhiil-hiii y mi iudiea- SCROLLS VKRTICALES 

n ansa objetos, controisir ntarca- dm del tnimero de giupoa rcseata- 

rcs numeric*!* y Kraficus elce- dos Utilizartms la palabra icnill — 

■a. — La mitad inferior de la pan- ingles SCREEN ROLL— p. 

Paraveriodoesioreali/aimosun islla se drali/a de ahajo a arril.a dicar un deslinaniienin del .. 

;go paso a paso v desde cl prin- con cl paisaje. Kn la pane superior tiitlri de la pantalla cii alyiuia di- «| 

lid. anal i/.«n> <<■ t-stlii una lie las de esta miiad rata el esquiador o rteei.m. I.I prnpio Spectrum pre- ^ 

leas del programs. Adeiniis esio K cupo dg enquladures bujando por smu \.r ■/,'' c.iando h;i llenadn una 

.sBcrvirii ile 'liusi- para vcr aleu- In momana. pan tails. 

!, imtniecioncs y funcinncs nue- A primers v.su pmeromar un En BASIC no hay mynuoa inn- ^ 

( del BASlC'del Speorum. jucko como este puede parece> trooctdn que n<» permits hacer f 

muy compl.cidu. A lo largo del unli a voluntad. pern podemon g. 

actk-ulo veremos que sumor diev utllwwi la mi*ma parte que em- 3 

RESCATEENLOSALPES rosan sencillas no da una cosa plea el Spectrum r-uandu desttia * 

complicada: solo obiendre.nw. la palilalia (en los linados, por (. 

primero que necesitamos una rota sencilla mas lair-a. eiemplo). Para hacer , .... lendre- _ 

hacer un videojuegn ea una 




ios que cjecuiar gra de las rtiii- qui*;! te intcrtse saber que prime- 
is dc la ROM, que estd en eodigo to enoontramus el truco, y despues 

Para uiiliiar ccidiRn maquiiia no jsego, lo cual no cs mala tecnica, 

imo sc programa. En BASIC hay enlra per aba jo una linea en Man- 
ia funcion para utilizer una ruti- co y la linea superior desaparecc. 
i en cridigo maquioa: solo nete- Con la pnntalla en hlanen (CAS 
ramos conocer la direction de y ENTER) pruebavarias veces; 




ffiwraMffl 



i fun 



r, que vere- ™ m riwp™™nTl'mi*Vo TuTo^y do una fila que aimulnra el 
m:is deralle. despla/j-mos la pamalla, vera* que que eStamo* recogiendo. 



ram. is nbieiiiciuli. urtu Ilia .leas 

leoacos. Estc es el sistema que qujadurmjlii iuv (|uc ilihui.-ir 

emplearemos paru ponerla fila de quiador real una fila mas 

^^_^^^_^^_^^_^^_^ caquiadores. De csia forma solo q'"= aiues, v para perdcr un 



... baquei 

csplaza toda la plamalla una 11- 1 uc " aulomalicamcnle. Vamos a ver alinra oinin dei. 

ea hacia a.riba. Llena la pamalla. . 1-1 '"""<r.. <i,- ^(..i.,.!.,..- <l, I., 1.1"...- !■■> , l.nques de nu«,ro 

esiemos poniendo el csquiador quiador parado. Para tracer c 
a llena la pamalla ycnlra 



.1 aljjo y p 



afoti 



cl BASIC: 



cad a foil 
lanialla avanza un ci 



■I l.liiu 



■ ItI M.lu l.hl UM°H i ac[et 

mirad W'erior"!l, ' !: ,' 'p-'nulh ^"^^^,1^ LKtY '= VsR EL«_LlL! i B _L Jl " 1 ' I » I ' I l»hj 
nucsiro vidcojuego. Eu reali- 3584 el arbnl suhira un earaeler I — f^ ] L [ g ~| 




ii if nir- 



4J-- 


-*Sklf 


- "■ ■ 


-^jfjr 


4-i 




4#f 


^4 


-rr4r 


.0 



tis L-iitiircs, niando en un li 

a pantalia attr fi'ii^.oo 

ios de fiO sabrem™ que en 



a fila dr partial 



arboles c 



imii! 



,ill:l lie , 



i, ATTR on onos colore* da- 
. n priner la palilalia a ™s CO- 
■syhaccr PRINT ATTR (0,0). 




:l blan 



valor dc ATTR 



imSs. Cuaniw 

qucmos mas tupuln sera el hnsque 
v masdificuhad tendracl jiil-k"- 
360: Cuandn nemos ccigidn wdci 

cador. poner uno mfa »1 indicsdor . . , 

dcartiposcogidns, etcetera. sui)irem..s a e«|iunti..r real ur 

430: Oundn hava ..„ ch.iqne r,la pa rape,detu..e Sq u la d™. 
con u„ arbnl, pctdremns cl b..rde S0 ° : L ™"{» C1 * c ™'« u ; L ' 

. / reatnrem™ umi il HU'I'dnr pmiiirenm* el bnrdc I 



■quiadores eoeid™ 



:|uiadores recngidns. 




S'JH: Cumdo icrmint 


el iuef>'i 


™»"™°",™!T 


,!,"'," i". 


Ni"£^,"m'"i"»', 


ITtada 




Rl el or- 


n en que Uik enlnqiicm 
lpi.rtaiiiia. Ij> que cue 


i.i es lb- 































■»' 


























































































• - 


, . 



























.irar.K- la ultima fila dc palilalia 

_ san-mus ult PRINT AT con lin 
^ ruiiti.:roalaiarcntrc0v31para1n 







r una v «tra Vl'7. A i-iulii 



de la palilalia. eSquisdoc, ei- 

Antcs de csic lazo principal ntr- 



l --,i„a IS 



t.:i Im.a 290 mis asi-KUra que en 
cada fila haya un Stool, porque 



Brara |..mi.-i i... t -.«|iii.ni..n-.-. pa- 
rados uaaremi.s un sisti'iiiii m.iv 



La C que haci- du tsqni:i.l<.r urn- 

CO. La lima aJ.il iilt.ilifi.iara al ts- 
qiliadur. 

t ;i«. t f,vpiinini ( iMi,i,.|ii..^] . 




mn^rama^a ,:: 
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zM khlxl bl c-t-Nk-FTTI 



pantalis, Es- 5 para deaplax 
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. | . | «T- TT1 ^t -ttttpi iri.TiniTn.-FT-l'n ?W-"1il T> |iTT-TTCl3 



- In lil.i dunde v.i (-1 esuui 
,1, y la variable X para ind 

,„.■„„,. ,nl.L variable SC^ 
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i'lBMS 


. a ? 


Jl e t 1 Is I'UI 1 



JrpORGOE T^NTOLJO 
c CON EL SCROLL £ 
EL GL TIENE UN& 

FUNClOK 

QUE LO H&CE. 



SI, PESO ESO SUPONE 
NWOECON&OMO DE 
MEMORIA. EL SPECTPUM 
NDLATIENE.PERO LE 
PODEMOS ENGAiNAR 



de crupus cumpli 
tipoBrafiLT- Paoitsi 
miplcarcmos dos variables <lc ei 
■ac teres: TJ para las esqiiiadivres 
FiBias vartabli 



GS 



tin II cr 



mbnlitf 



lamalla mas o mends rroai de vi 



itttMMftffi^SS 




l,i iinn.-i.Vn 1NKEYS nos 

raeter une wrr.-spr.ridc a la tccla * 

„■ hava pulsada en el momenio t, 

la pulsada ds "». 

«l 



Ahora p imam ns I'ldiis eslos 



r x \ cia pulsada da — . 

\ \ Coma la variable X indica la n> 

J lumna dimdc pondremo* *l e*- 

y quiadnr, ill disminuir X cs,c apa 



, nja d Ur .n« r7T» la TTTTTn-liTTinrFIa m^nTFffl TL-FTTn 



^eh^ 
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LI ,-<ttii]iatli>r esia en las coordena- . 
dus inditadas prn la fila Y y la co- Jl 
lunula X, de iiumIij que niirsuvTiiiis *( 
si delan.c del esquiador (en laa | ( 



tinla vcrde (y no pondrcmos plai 



.„.„!!., 



(unci™ ATTR (fila.cnlumna) da 

I 60 cuando en e*a filn v column* In v _, , 

es vetde y el papel blam 
itra pam, en la lihea 430 ei 



SI DEI-ANTE DLL ESQUIA 

' DOR (EN LA HLA V+1, — 
LilMNA X) HAV UN ARHOI. 

, (TINTA VERDE PAPEL BLAN- 
CO) ENTONCES VE A LA SU 

' BRUTINADEI.ALINKA4.30. 
oesto mo en BASIC quedai 
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jHj;m-^Tn^rnTT'i M.i-h i.uui i«u-i«n 



La A que nace dc csqui; 

en ni..do«. At haccr cl i-rntf 

quedadiilallneamrerii.fde 

lUl \acia. Vutnris li poner illfjiin *'- 

bnl y/o csquiador paiadn con ' 



i-' • :■■ i ">!ii"i_znz 







kspu*a dc ejecutar la subrurins 

!c 430 vol vermis al principal del 
ttto con GO TO ISO. Si no bay 



H'l.i i-i-i I 'M I'i'i'i 
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il(A I 1 11=57) v lasiibmt 



iraeM^ffi 
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a dc 590 que i 
lode, con RUNt 



a | ItIhUIkI l.kl- FT^TT^KniEN] ^^^^£S5S 



cadana llcna do bander 
.alidad son caractere 
jede definir cl usui 



£££=£ - ^aiffl^s^sffl^^ 



dores que llcvam 
I Cu.indo complMem 




En la variable Y u 



rnp<v.:ir nn nucvo j;ru- 
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<*COMPR£ND(TS 
A MORA 

LA UTILIDAD 

de ATTR ? 



SI, NO HAY NADA CCMO 
TENERUNklMSTRlX- 
CION PAPA DETECT.GR 
LOS, AR BOLES 





h m^m&m mmm^ 
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am y sumamos 100 pnnttM « 



6 m i l :H:r l :H.tU. I . H. 
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Crinin acahamns dc cogcr un es- 
quiadnr tcncmos que inir:ir si ya 
Isncmus un fjrupu emliplcuilii. 




SB® 



ENTER. Para ello ponemoi u 
INPUT. No noe tatttes* I., ^t a 
enire en el tedadn: sola que el 01 
denadof espere a que sc puis 
ENTER v lueea si|>a: 



\*]* jt\ |. | M |»I"|t| h.i 



"vasittiiiirlnsiilask-lraa: 
.squiador. 
i Arbxl Imqu, con Inrmi dc 







ik-i.iJU- c > ki- purrim dlhCrtHf 

csios ilil...i:.~, LTujiriarlin y aslR- 
narlog a 1»- ramctenrt artf'™* 

ma que no cuiicndan, un inclod'j 
mil dc vet In que hue e» modifi- 



. liger, 

mbia el jucro. Inclusr, pucd 
titan esie lisiado dc base par 
iaerotmf.MHopv.cido, 

J„a n Sales R i| 
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COMPRO, m 




03©©, CAMBIO 




f Vendo ZX Spectrum 




' dc 16 K eon televisor Pa- 




nasonic, B.<K Fueme dc 












cidn Horizon! cs. Todo 




pot 30.000 pesetas. Lla- 





21 39 25.Girona. 



^^ 



nic. Chcta Cortes. La l.r.i. 
(.uera. l.angrctAs.ur,,.; 
Id; OT.iT St. Y t nd<: Ami 



mas pan /X S| ..:<:! rurr. WIili,- l.i^i 
[liu;, Pascal, El HoM.it, Sil.ic Wulf. 
tic . liscribir ;l: |i.tu«. Siiriclio Vilk'e,!-. 
]g]csiilS8-5.EIFeriol(UCoruna)! 

Intcrcambio dc pro^um.is jura 
cl S|>cctrum. Ultimas nr.vi.li.li s i!i-,|»i 



nlc ream bio o compro pCDgla- 
H dd Spectrum 4B K. Uamar a par- 
dc las 15.00 horas. Tel; (93) 
( 04 07 dc Barcelona, en horario . 
ardc 13,00a IS.UOhoras.Prcguni 



' Comprq imprcsora dc sc- 
Runda mano para ZX 81. 
Llamarakcl:( , )3)256 75 65, 
o cscribir x Jose Maria Mia- 

rim-. I .uis .Sa^nicr. ^7-iicieo I. 
08032 Barcelona. 




Ciunbki prinu-iM* cupias pur 
els;(93)6(>5 22B! - 204 (A M0. Prefe- 



{>■:■,. Gdlj|<ll,U]S Gold, lull Throttle, 

Alien 8, Condcname Mat, Pyramid. 

P v j:m u:i ran in. Moon Alert, a 4240 pc- 

25 2dcli,i.360Ul Pontevcdra. 



Vendo Spectrum 16 K. con n 
nual de instructions y dc progran 
cidn BASIC y dos cassettes. Tsmhi 

12.000 pesetas. Intcrcsados ponersc 
contacts ton Jose Carlos Gonial 
Transversal Dona rcrmina, In. Vi 
(Pontevedra).Tel;37B3 8B. 



■iraiiias. Tciisti HI.S!- Jl- 600. Proi 
conre«aratndos.l5iri).i™ a Jo-cjuliu 
Bocos Garcia. Pasco dc Pamplona, ' " 
esc. 7, 9-B. Tudela (Navarta], ' 
(948) B2 62 64. 



NIGHTSHADE l.O ULTIMO... dc ULTIMATE 
P.V.P. RECOMRNDADO: 2.100 PTAS. 



48K SINCLAIR ZX SPECTRUM 
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C/ HORTALEZA, 53 

28004- MADRID 

TEL: (91) 231 57 64-232 26 40 



